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CHAPTER    1 
INTRODUCTION 


1. 1      Starting  Out. 

1.1.1      MAXBAND . 

MAXBAND',  or  Maximal  Bandwidth  Traffic  Signal  Setting  Optimization 
Program,  is  a  system  which  finds  traffic  signal  settings  on  arteries,  or 
certain  networks  of  three  arteries,  which  result  in  maximal  bandwidths. 
Problems  are  formulated  as  mixed  integer  programs.  The  system  is  based  on 
the  traffic  signal  model  developed  by  J.D.C.  Little  of  the  Massachusetts 
Institute  of  Technology  [1965:1977].  MAXBAND  is  written  in  FORTRAN  using 
structured   programming  techniques. 

System   inputs  include: 


1.  Network  geometry; 

2.  Signal   splits,     or     traffic     volume     data     on     links     and       link 
capacities; 

3.  Range  of  acceptable  cycle  lengths; 

4.  Ranges  of  acceptable  speeds  on  links; 

5.  Left  turn   phasing   patterns  desired. 
Outputs  include: 

1.  Bandwidth  durations; 

2.  Cycle  length; 

3.  Signal   splits   (if  not  given  in  input); 

4.  Beginning   and   ending  times  of  splits  and  bandwidth  periods; 

5.  Left  turn  and   all   red   phasing   patterns; 

6.  Traversal    times  and    speeds  on   links. 

For  more   information  on  the  capabilities  and   features     of     the     MAXBAND 
system,   see  the  MAXBAND  User's  Manual. 


1    - 


1 .2  How  to  Use  this  Manual. 

This  manual  is  intended  to  serve  as  a  reference  for  the  maintenance  of 
the  MAXBAND  system. 


1.2. 1  Contents, 


Chapter  1 :  Introduction  presents  the  general  features  of  the  MAXBAND 
code. 

Chapter  2:  The  MAXBAND  Module,  Chapter  3:  The  INPUT  Module,  Chapter 
4:  The  MATGEN  Module,  and  Chapter  6:  The  OUTPUT  Module  contain 
subroutine  descriptions  for  these  four  modules. 

Chapter  5:  The  MPCODE  Module  explains  the  modifications  which  have 
been  made  to  the  MPCODE  mathematical  programming  system  in  order  to  use  it 
in  MAXBAND. 

Appendix  A:  Models  and  Formulations  presents  the  split  models  and 
problem  formulations  used  in  the  code. 

Appendix  B:  Subroutine  Calling  Structure  contains  tables  explaining 
the  relationships  between  the  subroutines  of  the  INPUT,  MATGEN  and  OUTPUT 
modules. 

Appendix  C:  Variable  Usage  contains  tables  explaining  in  which 
subroutines  the  local  variables  declared  in  the  subroutines  MAXBAND 
(MAXBAND  module)  ,  INPUT  (INPUT  module)  and  GDOUT  (OUTPUT  module)  are 
altered  or  used  without  alteration. 


1.2.2  Subroutine  Descriptions. 

All  of  the  subroutine  descriptions  use  the  following  format: 
Subroutine  <Name  of  the  subroutine^ 
1 .  2.  2.  1  Purpose. 

<Explains  the  specific  task  of  the  subroutines 
1 .2.2.2  Synopsis. 

<Explains  in  detail  how  this  task  is  performed. > 
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1.2.2.3  Subroutine  linkage. 

Called  by:   <Any  subroutines  which  call  this  subroutines 
Calls:   <Any  subroutines  this  subroutine  calls. > 

1.2.2.4  Local  Variables. 

<New  variables  used  in  the  subroutine  or  in  the  subroutines  it 
calls,  which  were  not  passed  to  it.  They  are  given  with  their  names 
and  dimensions,  as  they  are  declared,  followed  by  a  descriptions 

1.2.2.5  Outside  Variables. 

<Variables  which  are  passed  to  the  subroutine  by  its  superiors. 
These  variables  form  the  argument  list  of  the  subroutine. 

In  general,  subroutines  which  call  this  subroutine  will  use  the 
same  variable  names  in  their  call  statements  as  appear  here. 
Occasionally,  however,  the  calling  subroutine  will  substitute  an 
explicit  value  for  a  variable  name  in  the  call  statement.  It  is  also 
possible  that  the  calling  subroutine  will  use  a  different  variable 
name  in  its  call  statement  than  appears  in  the  called  subroutine's 
argument  list. 

'from  xxxxx'  indicates  the  subroutine  in  which  the  variable  was 
first  defined  and  declared  as  a  local  variables 

Altered:   <Variables  whose  values  are  changed  in  this  subroutines 
Used:   <Variables  whose  values  are  used  but  not  altered.   This 
includes  variables  which  are  passed  by  the  subroutine  to 
its  subordinates  but  are  not  changed   in  the  subroutine 
itself S 


1.2.3  Other  Manuals 


This  manual  should  be  used   in  conjunction  with  the  MAXBAND  User's 
Manual,  and  the  Summary  Report. 


1. 3  Structure  of  the  System. 

1.3.1  Features  and  Philosophy. 

MAXBAND  is  written  in  standard  FORTRAN  using  the  principles   of 
structured  programming. 

In  general,  these  principles,  as  used  in  MAXBAND,  are 


1.  A  program  should  be  organized  as  series  of  independent, 
sequentially  executing  subtasks;  each  of  these  sub  tasks  should 
perform  its  function  and  return  control  to  the  main  program 
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without  altering  the  program  flow. 

2.  The  structure  of  each  task  should  be  simple.  A  difficult  task 
should  be  broken  into  large  aggregate  subtasks  which  can  be 
easily  related. 

3.  Each  subtask  should  be  passed  only  the  information  and  control 
capability  which  it  requires  to  perform  its  function. 

4.  The  process  of  subtasking  should  continue  down  to  levels  where 
the  tasks  are  well  defined  and  easy  to  perform. 

5.  There  should  be  only  three  types  of  tasks: 

a)  a  function; 

b)  an  iteration  of  a  function; 

c)  an  if-then-else  with  each  branch  a  function. 

Each  task  must  appear  to  its  superior  as  independent,  i.e.,  it 
changes  the  values  of  the  variables  passed  to  it  in  the  desired 
manner,  but  has  no  other  effect  on  the  program.  For  the 
if-then-else  task,  this  means  that  both  branches  must  eventually 
return  control  to  the  same  point.  The  IF  statements  in  the 
MAXBAND  code  have  all  been  constructed  with  this  principle  in 
mind. 

A  program  written  in  this  way  is  a  hierarchy  of  subroutines,  each 
subroutine  corresponding  to  a  task  in  the  hierarchy  of  tasks  which 
performs  the  program's  function. 

In  the  MAXBAND  code  the  process  of  subtasking  has  usually  been 
continued  until  the  simplest  task  is  either  very  simple  to  perform,  or 
requires  only  1  to  2  pages  of  code,  whichever  occurs  later. 

The  broadest  subdivision  of  the  MAXBAND  system  results  in  the  modules 
shown  in  figure  1.  These  modules  are  explained  in  the  following  sections. 


1.3.2  The  MAXBAND  Module. 

The  MAXBAND  module  contains  the  main  program  and  several  subroutines. 
It  provides  overall  control  of  the  system. 


1.3.3  The  INPUT  Module. 

The  INPUT  module  reads  the  input  cards  on  FORTRAN  file  4,   and  places 

their  card   images  in  a  temporary  disk  file  on  FORTRAN  file  5.   It  then 

reads  the  card  images  from  file  5,  checks  them  for  errors  and  converts  the 
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Figure  1:   The  MAXBAND  system. 
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information  they  contain  into  the  internal  form  used  by  MAXBAND.  This 
conversion  includes  the  calculation  of  splits  from  volume  and  capacity 
information,  when  this  is  to  be  done,  and  the  modification  of  splits  to 
satisfy  minimum  split  times. 

The  INPUT  module  produces  the  first  portion  of  the  MAXBAND  output  on 
FORTRAN  file  6.  It  first  echoes  the  input  cards.  Interspersed  among  and 
following  the  echoes  are  any  warning  and  error  messages  produced  when 
errors  are  found  in  the  input  cards.  If  no  serious  errors  are  detected, 
the  module  then  prints  an  input  data  summary.  This  contains  the  final 
version  of  the  input  information  which  will  be  passed  to  the  Matrix 
Generator  (MATGEN)  module. 

The  user  can  specify  that  MAXBAND  halt  after  the  INPUT  module  has 
executed.  The  system  will  produce  only  the  input  card  echoes  and  the 
input  data  summary. 


1.3.4  The  Matrix  Generator  (MATGEN)  Module. 

MAXBAND  formulates  problems  as  mixed  integer  mathematical  programs. 
These  are  solved  by  the  MPCODE  module,  which  contains  the  MPCODE 
mathematical  programming  system.  After  the  input  data  has  been  translated 
to  the  internal  form  by  the  INPUT  module,  the  Matrix  Generator  (MATGEN) 
module  builds  this  information  into  a  mixed  integer  formulation,  which  is 
used  as  input  to  the  MPCODE  module.  The  MATGEN  module  places  this 
formulation  on  FORTRAN  file  11. 


1.3.5  The  MPCODE  Module. 

MAXBAND  uses  the  MPCODE  mathematical  programming  system,  written  by 
A.  Land  and  S.  Powell  [1973],  to  solve  the  problem  formulations  produced 
by  the  MATGEN  module.  The  mixed  integer  portions  of  the  MPCODE  system 
have  been  placed  in  the  MPCODE  module. 

The  module  reads  the  problem  formulation  produced  by  the  MATGEN  module 
on  FORTRAN  file  11,  solves  the  problem,  and  passes  the  results  back  to  the 
MAXBAND  control  module. 

The  output  capabilities  of  the  original  MPCODE  system  have  been 
retained.  The  MPCODE  module  writes  the  MPCODE  output  described  by  Land 
and  Powell  on  FORTRAN  file  12.   This  file  may  be  dummied  if  not  required. 

The  MPCODE  module  also  incorporates  the  restart  capabilities  of  the 
original  MPCODE  system.  If  the  upper  limit  on  the  total  number  of 
iterations  is  about  to  be  exceeded,  the  module  will  stop  trying  to  solve 
the  problem  and  will  write  a  restart  file  to  FORTRAN  file  7.  The  restart 
file  contains  the  state  of  the  module  just  before  the  file  is  written.  If 
the  user  later  chooses  to  restart  the  problem,  the  MPCODE  module  will  read 
the  latest  restart  file  on  FORTRAN  file  8.   This  prevents  the  system  from 
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having  to  repeat  work  already  done. 


1.3.6  The  OUTPUT  Module. 

After  the  MPCODE  module  has  completed,  MAXBAND  calls  the  OUTPUT  module 
to  report  any  solution  found. 

The  OUTPUT  module  first  reports  whether  the  MPCODE  module  has  found  a 
solution  and  whether  any  error  conditions  were  encountered.  It  then  gives 
statistics  describing  the  operation  of  the  MPCODE  system.  Finally,  if 
MPCODE  was  able  to  find  a  problem  solution,  the  OUTPUT  module  prints  the 
signal  settings  and  other  values  given  by  this  solution. 


1.3.7  Variables. 

In  accordance  with  the  structured  principles  discussed  above,  each 
subroutine  in  MAXBAND  is  passed  only  those  variables  which  it  requires  to 
perform  its  function.  Variables  involved  with  a  task  which  is  completed 
solely  by  the  subroutine  and  the  subroutines  it  calls  are  generally 
declared  as  local  variables.  Large  blocks  of  common  variables  are  not 
used.  However,  the  local  variables  of  subroutines  which  are  near  the  top 
of  the  hierarchy  may  be  used  in  many  of  the  subordinate  subroutines,  in 
much  the  same  way  common  variables  would  be. 

In  the  MAXBAND,  the  local  variables  declared  in  subroutines  MAXBAND, 
INPUT  and  GDOUT  are  used  extensively  throughout  the  system.  These 
variables  are  described  in  the  sections  dealing  with  these  subroutines  and 
in  appendix  B. 

1.3.7.1  Variable  Dimensions  and  Subscripts. 

The  arrays  used  in  MAXBAND  are  generally  have  standardized  dimensions; 
arrays  of  the  same  dimensions  are  usually  subscripted  by  the  same 
quantities.  Following  is  a  description  of  the  various  dimensions  used, 
with  the  values  used  for  subscripts.  Examples  are  taken  from  the  local 
variables  declared  in  subroutines  MAXBAND  and  INPUT. 


(2)  —  LNAME,  T. 

Arrays  of  this  size  are  not  subscripted  by  a  standard  quantity. 
The  two  elements  of  LNAME  hold  the  16  characters  of  the  loop  name, 
while  T(1)  and  T(2)  are  the  lower  and  upper  cycle  time  limits. 

(3)  --  N,    METRIC,    ORIENT. 

Arrays  of  this  size  are  usually  subscripted  by  artery  number. 

(6)  —  K,  KFLAG,  IINTER. 

No  standardized  subscript  —  different  for  each  variable. 


7  - 


(2,3)  --  INTER,  C,  ANAME. 

The  second  subscript  is  the  artery  number. 

For  integer  and  real  variables,  the  first  subscript  is   the 

direction  number: 

1  -  outbound; 

2  -  inbound. 

For  real*8  variables,  the  2  elements  are  usually  the  16  characters 
of  a  name. 

(18,3)  —  IG,  IGBAR,  IH,  IHBAR. 

First  subscript  is  number  of  a  pair  of  links. 
Second  subscript  is  artery  number. 

(19,3)  —  D,  DBAR,  E,  EBAR,  F,  FBAR. 

First  subscript  is  number  of  a  link. 
Second  subscript  is  artery  number. 

(20,3)  —  R,  RBAR,  L,  LBAR,  TAU,  TAUBAR. 

First  subscript  is  the  intersection  number. 
Second  subscript  is  the  artery  number. 

(2,20,3)  —  INAME,  IINAME. 

These  variables  hold   16  character  names.   The  first  subscript 
refers  to  the  first  or  second  8  characters  of  the  name. 
The  second  subscript  is  the  intersection  number. 
The  third  subscript  is  the  artery  number. 

(4,20,3)  --  LPAT,  G,  IL. 

LPAT  contains  the  user's  choice  of  left  turn  patterns.    Its  first 

subscript  is  the  number  of  a  left  turn  pattern. 

The  rest  of  the  variables  of  this  size  are  card  image  variables 

declared  in  INPUT.   Their  first  subscript  is  the  direction  number, 

with  1,2,3  or  4  for  N,S,E,  or  W. 

The  second  subscript  is  the  intersection  number. 

The  third  subscript  is  the  artery  number. 

(142)  —  OUTVAR. 

This  variable  contains  the  values  of  the  decision  variables  found 
by  MPCODE.  There  can  be  up  to  142  of  these  variables.  The 
subscript  is  the  index  of  the  variable  desired. 

1.3.7.2  Other  Variable  Conventions. 

Variables  whose  names  end  in  BAR  contain  inbound  values;   the  variables 
with  the  same  names  but  without  the  BAR  contain  outbound  values. 
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1 .4  Operating  System  Notes. 
1.4.1  FORTRAN  Files. 

MAXBAND  uses  the  following  FORTRAN  logical  files: 


DDNAME 


RECFM 


LRECL 


USE 


FT04F001 

FB 

80 

card  input 

FT05F001 

FB 

80 

card  images 
(temporary 
disk  file) 

FT06F001 

FB 

133 

output 

FT07F001 

FB 

80 

restart  output 

FT08F001 

FB 

80 

restart  input 

FT11F001 

FB 

80 

MPCODE  input 

FT12F001 

FB 

133 

MPCODE  output 

File  8  is  normally  dummied,  except  when  restarting.  File  12  may  also  be 
dummied  if  the  user  does  not  need  the  MPCODE  system  output. 


1.4.2  Core  Requirements. 

Following  are  the  minimum  amounts  of  core  required  by  each  of  the  five 
modules: 


MODULE 


total 


MINIMUM  CORE  (K) 


MAXBAND 

8 

INPUT 

114 

MATGEN 

84 

MPCODE 

245 

OUTPUT 

89 

540 


MAXBAND,  INPUT,  MATGEN  and  OUTPUT  were  compiled  using  the  FORTRAN  IV  G 
compiler;  MPCODE  was  compiled  by  the  FORTRAN  H  Extended  compiler,  using 
the  optimize(2)  option. 

These  figures  do  not  include  any  core  which  may  be  required  by  the 
operating  system. 
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Since  the  INPUT,  MATGEN,  MPCODE  and  OUTPUT  modules  execute 
sequentially,  they  may  overlay  each  other.  The  MAXBAND  module  must  be  in 
memory  at  all  times. 

The  following  subroutines  compose  each  module: 


MODULE  SUBROUTINES 


MAXBAND 

MAXBAND  to  MAXEND 

INPUT 

INPUT  to  ISTUNT 

MATGEN 

MATGEN  to  LEOF 

MPCODE 

MPCODE  to  RESTRT 

OUTPUT 

OUTPUT  to  JNTLSC 

MAXBAND  was  tested  at  the  Federal  Highway  Administration  on  an  IBM  360 
model  65  computer,  using  overlays.  The  following  overlay  control  cards 
were  used: 


OVERLAY  ALPHA 
INSERT  MAXHD, MAXEND 

OVERLAY  BETA 
INSERT  INPUT 
OVERLAY  GAMMA 

INSERT       INIT , IDATA , CHEAD, RART , DOCRDS , RLOOP, RCARD, CSTART 
INSERT  CMPC0D,CSETUP,CSETL,CART,CART2,CL00P1,CL00P2,CMAP,CKFLAG 
INSERT  CSPEC , CLENGT , CLEFTP, CSPEED, CQUEUE , CVOL , CCAP , CMING 

OVERLAY  GAMMA 
INSERT  COMPTE 

INSERT  SETN , SETKC , CKVOL , STSPLT , CKSPLT , CKCORE , SETLEF , SETTAU , SETDST 
INSERT  SETSPD , CKSPD , SETINF , SETKS , AVG VOL , SETINT , CHKINT , CKMAX 

OVERLAY  GAMMA 
INSERT  SUMARY 

INSERT  SUMREP,MPREP,LOOPHD,ARTREP, INTVAL, TRANS, MNGINF, LNKVAL 
INSERT  VOLINF , CAPINF , ISTDIR , ISTUNT 

OVERLAY  BETA 
INSERT  MATGEN 

OVERLAY  GAMMA 
INSERT       MATGNA , DLCNT , CNCNT , BBCALL , BBC  1 , BBC2, LINP 1 , LINP2, LINP4 
INSERT  LINP6,WL623,WL64A,WL64B,WL65,WL667,WL68,WL681 ,WL682 
INSERT  WL683,LINP8,WL82,WL83,WL84A,WL84B,WL85,WL86A,WL86B,WL87A 
ISERT  WL87B,WL88,WL881 .WL882.WL883, NINES, MORE, EOF 

OVERLAY  GAMMA 
INSERT  MATGNL.LDLCNT 

INSERT  LCNCNT,KCNT,GMCNT,FSTART,LBBCAL,LBBC1,LBBC2,LLINP1,LLINP2 
INSERT  LLINP4, LLINP6, LWL623 , LWL64A , LWL64B , LWL65 , LWL667 , LWL68 , LWL681 
INSERT  LWL682 , LWL683 , WL69 , LLINP8, LWL82 , LWL83 , LWL84A , LWL84B , LWL85 
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INSERT  LWL86A,LWL86B,LWL87A,LWL87B,LWL88,LWL881  ,  LWL882  ,  LWL883 

INSERT  WL89.GIDLB.WL891 ,WL892,LNINES,LMORE,LEOF 
OVERLAY  BETA 

INSERT  MPCODE , LINP , LP , DOANLP , A , ADDCON , CHACC , CHBSIS , CHSLCK , COPY 

INSERT  DATA , FIRSTB , IEXIT , IPRINT , ISOPT , NEWVEC , REDUCE , REVERT 

INSERT  SEEX, SEEKY , SPRINT , QP , MIF , BB , BACKUP , BBDATA , BRANCH 

INSERT  DUAL, ISTAIL, PNODE , RESTRT, PLP 

INSERT  AREF.BBB 
OVERLAY  BETA 

INSET  GDOUT, OUTPUT 
OVERLAY  GAMMA 

INSERT       BADOUT , MPSTART , GETVAR , RDLCNT , RFSTRT 

INSERT  ASSIGN , AB , AZ , AW , AWBAR , AT , ATBAR , ADELS , AGAMS 
OVERLAY  GAMMA 

INSERT  SERVAR , SETC YC , SETGMC , SETOFF , SETPHI , SETDLT , SETOFB , CHKOFS 

INSERT  SETOFE , STMCOF , ONERND , CKONE , CNVSEC , SETLPT , SETLNK 
OVERLAY  GAMMA 

INSERT  REPORT , ARTOUT , INTINF , DIVC YC , PHSFRC , PHSSEC , TIMSPD , SETDIR , SETUNT 

INSERT  LPOUT , LOOPTP, JNTOUT , JNTFRC , JNTLFR , JNTSEC , JNTLSC 
ENTRY  MAIN 


These  overlay  segments  required  the  following  amounts  of  core: 


SEGMENT  CONTENTS  (SUBROUTINES)     REQUIRED  CORE  (K) 

Main  program,  unlabeled  common,  201 

and  system  routines 

MAXHEAD,  MAXEND  1 

INPUT  18 

INIT  -  CMING  38 

COMPTE  -  CKMAX  25 

SUMARY  -  ISTUNT  20 

MATGEN  2 

MATGNA  -  EOF  27 

MATGNL  -  LEOF  38 

MPCODE  -  PLP,  labeled  common  69 

OUTPUT,  GDOUT  19 

BADOUT  -  AGAMS  10 

SETVAR  -  SETLNK  19 

REPORT  -  JNTLSC  33 

maximum  core  required  at  one  time  273 
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1.4.3  System  Performance. 

Table  1  of  Volume  1  gives  performance  statistics  for  a  series  of 
problems  solved  by  MAXBAND.  These  were  run  at  MIT  on  an  IBM  370/168 
computer  using  the  Conversational  Monitor  System  (CMS)  operating  system. 
The  table  includes  details  of  the  problem  forumlation  given  to  the  MPCODE 
system. 
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CHAPTER   2 
THE  MAXBAND  MODULE 

This  module  provides  overall  control  of  the  MAXBAND  system. 


2. 1   Input  and  Output. 

The  overall  input  and  output  performed  by  the  MAXBAND  system  is 

explained  in  chapter  1.  The  only  I/O  not  done  by  the  INPUT,  MATGEN, 

MPCODE  or  MATGEN  module  is  the  writing  of  the  MAXBAND  heading  and  end 
lines  on  unit  6. 


2.2  Routines. 

2.2.1      Program  MAXBAND. 

2.  2.  1.  1   Purpose. 

Provides  overall  control  of  the  MAXBAND  system. 
2. 2. 1 . 2  Synopsis. 

1.  MAXHD  writes  the  MAXBAND  heading  line. 

2.  INPUT  reads  the  input  cards  from  file  4,  and  stores  their  values 
in  the  MAXBAND  variables.  If  requested,  INPUT  generates  an 
input  data  summary  on  file  6. 

3.  If  there  were  errors  in  the  input  cards  (ERRCNT  >  0)  or  if  the 
user  has  requested  that  processing  stop  after  the  INPUT  module 
(MESSL  =  3),  go  to  step  9. 

4.  MATGEN  creates  an  input  file  to  MPCODE  on  file  11.  This  file 
contains  the  problem  formulation  encoded  as  the  card  images 
described  by  Land  and  Powell  [1973]  as  input  for  MPCODE. 

5.  File  11  is  rewound  so  that  it  can  be  read  by  MPCODE.  ERRSET 
prevents  the  printing  of  underflow  (IBM  IH0208)  messages  while 
MPCODE  is  running  (see  below). 

6.  MPCODE  attempts  to  solve  the  problem.  It  produces  its  own 
output  on  file  12  and  may  use  files  7  and  8  for  restarting. 

7.  ERRSET  reenables  the  printing  of  underflow  errors. 


13  - 


8.  OUTPUT  reports  whether  MPCODE  has  found  a  solution.  If  there  is 
a  solution,  OUTPUT  converts  to  output  form  and  prints  a  solution 
report. 

9.  MAXEND  writes  the  MAXBAND  end  line. 

Note:  The  ERRSET  subroutine  is  part  of  the  IBM/370  environment  under 
which  MAXBAND  was  developed.  The  statements  referring  to  ERRSET  — 
EXTERNAL  ERRSET;  and  the  two  CALL  ERRSET  statements  —  should  be  removed 
when  MAXBAND  is  used  with  other  operating  systems. 

2.2.1.3  Subroutine  linkage. 

Called  by:      None. 

Calls:      MAXHD,    INPUT,    MATGEN,    MPCODE,    OUTPUT,    MAXEND,    ERRSET 

2.2.1.4  Local  Variables. 

The  MAXBAND  local  variables  follow  the  dimension  and  indexing 
coventions  explained  in  chapter  1 . 

Variables  used  to  transmit  information  between  the  INPUT  module  and  the 
MATGEN  and  OUTPUT  modules: 


Integer: 
LOOP 


N(3) 
METRICC3) 


INTER(2,3) 
SEQNO(20,3) 


LEFT(20,3) 


MAXRBB 

MAXIBB 

MAXITR 
MAXINV 
RESTRT 


Indicates  type  of  problem  — 

0  -  single  artery; 

1  -  loop. 

Number  of  intersections  in  each  artery. 

Index  —  artery  number. 
Units  used  in  analysis  — 

0  -  English; 

1  -  metric. 

Index  —  artery  number. 
Loop  geometry.  See  below  for  description. 
The  sequence  numbers  entered  on  the  MAP  card. 

Index  1  —  intersection  number;  index  2  —  artery 

number. 
The  choice  of  left  turn  patterns. 

Range:   0-15. 

t(1  )*1+t(2)*2+t(3)*4+t(4)*8  where 

t(i)  is  0  if  pattern  i  is  not  chosen 
by  the  user; 
1  if  pattern  i  is  chosen 
by  the  user. 
Limit  on  number  of  maximization  (or  branch  and  bound) 

iterations. 
Limit  on  number  of  maximization  (branch  and  bound) 

reinversions. 
Limit  on  number  of  linear  program  iterations. 
Limit  on  number  of  linear  program  reinversions. 
Indicates  whether  job  is  a  restart  — 

0  -  job  not  a  restart;   1  -  job  is  a  restart. 
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Real: 
K(6) 


C(2,3) 
T(2) 


Target  bandwidth  ratios. 

K(1),  K(2)  and  K(3)   are  the  inbound   to  outbound 

ratios  on  arteries  1,  2  and  3. 
K(4)  is  the  outbound  to  outbound  ratio  of  artery  2  to 

1. 
K(5)  is  the  outbound  to  outbound  ratio  of  artery  3  to 

1. 
K(6)  is  the  outbound  to  outbound  ratio  of  artery  3  to 

2. 
Objective  function  weights. 

Index  1  —  direction  (1  -  outbound;   2  -  inbound); 

Index  2  —  artery  number. 
T(1)  —  lower  cycle  time  limit;  T  (2 )  —  upper  cycle 

time  limit. 


The  following  variables  all  have 
Index   1    —  intersection  number; 
Index  2  —  artery  number: 


R(20,3) 

RBAR(20,3) 
L(20,3) 
LBAR(20,3) 
TAU(20,3) 

TAUBAR(20,3) 


Outbound  red  splits  (cycles). 
Inbound  red  splits  (cycles). 
Outbound  left  splits  (cycles). 
Inbound  left  splits  (cycles). 
Outbound  queue  clearance  (bandwidth 

(cycles) . 
Inbound  queue  clearance  (bandwidth 

(cycles) . 


advance) 
advance) 


times 


times 


The  following  variables  all  have 
Index  1  —  link  number  on  artery; 
Index  2  —  artery  number: 


D(19,3)  Outbound  link  lengths  (feet  or  meters) 

DBAR(19,3)  Inbound  link  lengths  (feet  or  meters). 

E (1 9, 3)  Lower  limit  on  outbound  link  speed 

meters/ sec)  . 

EBAR(19,3)  Lower  limit  on  inbound  link  speed. 

F(19,3)  Upper  limit  on  outbound  link  speed. 

FBAR(19,3)  Upper  limit  on  inbound  link  speed. 


(ft/ sec   or 


The  following  variables  all  have 

Index  1  —  number  of  a  pair  of  links; 
Index  2  —  artery  number. 


IG(18,3)      Lower  limit  on  change  in  inverse  outbound   speed 
between  links  (seconds/ foot  or  seconds/meter). 
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IGBAR(18,3)   Lower  limit  on  change  in  inverse  inbound 

between  links. 
IH (1 8, 3)      Upper  limit  on  change  in  inverse  outbound 

between  links. 
IHBAR(18,3)   Upper  limit  on  change  in  inverse  inbound 

between  links. 


speed 
speed 
speed 


Real*8: 

LNAMEC2) 
ANAME(2,3) 


Name  of  loop  (16  characters). 
Name  of  artery  (16  characters). 

Index  2  —  artery  number. 
NODENO(20,3)  Signal  node  number. 

Index  1  —  intersection  number;  index  2 

number. 
INAME(2, 20, 3)  Cross  street  name  (16  characters). 

Index  2  —  intersection  number;  index  3 

number. 
0RIENK3)     Direction  from  which  intersections  are  entered 

S,  E,  or  W. 

Index  1  —  artery  number. 


artery 

artery 

—  N, 


Variables  used  to  transmit  information  between  the  MPCODE  and  OUTPUT 


modules: 


Integer: 
STATUS 


BBITR 
BBINV 

MLPITR 

MLPINV 

NO  SOL 


Indicates  how  MPCODE  completed. 
Values: 

I  -  Optimal  solution  found. 

3  -  The  original  linear  program  is  unbounded. 

4  -  The  inverse  matrix  (INV)  is  too  small. 

5  -  The  LP  iteration  limit  exceeded. 

6  -  The  A  matrix  dimensions  too  small. 

7  -  LP  reinversion  limit  exceeded. 

II  -  Original  linear  program  is  infeasible. 
13  -  Problem  has  no  integer  solution. 

15  -  BB  iteration  limit  exceeded. 

16  -  Same  as  15  and  1 7. 

17  -  BB  reinversion  limit  exceeded. 
19  -  Restart  node  punched. 

Number  of  branch  and  bound  (BB)  iterations  performed. 
Number  of  branch   and   bound   (BB)   reinversions 

performed . 
Maximum  number  of  linear  program  (LP)   iterations 

performed . 
Maximum  number  of  linear  program  (LP)  reinversions 

performed. 
Number  of  progressively  better  integer   solutions 

found. 


Real: 
BESOBJ 
0UTVAR(142) 


Value  of  objective  function  at  best  solution. 
Matrix  of  decision  variables  returned   from  MPCODE 
MAXBAND. 


to 
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Variables  used  to  transmit   information   from  INPUT   to  MAXBAND   modules: 

Integer: 

ERRCNT       Number  of  errors  found  in  the  input  cards. 

MESSL        Message  level  —  indicates  how  much  output  should  be 

generated . 

Values: 

0  -  Print  input  card  echoes;   input  data  summary; 

mpcode  statistics  and  solution  report. 

1  -  Print  input  data  summary;   mpcode  statistics  and 

solution  report. 

2  -  Print  mpcode  statistics  and  solution  report. 

3  -  Print  only  input  card  echoes  and   input  data 

summary.   In  this  case,  MAXBAND  stops  execution 
after  the  INPUT  module  has  completed) . 

Notes: 


1.  INTER(2,3)  contains  the  intersection  numbers  at  artery  meetings 
in  a  loop.  Figure  2  shows  how  the  loop  geometry  is  encoded  in 
INTER.  A  traversal  of  the  loop  is  made  from  art  1  to  art  2  to 
art  3,  going  from  A  to  B  to  C.  For  each  artery  ART, 
INTERO.ART)  is  the  intersection  number  where  the  artery  is 
entered  in  this  traversal,  and  INTER (2, ART)  is  the  intersection 
number  where  the  artery  is  exited. 


^yartery  3 


artery  2 
-^  outbound  direction  of  artery 


Figure  2:   Loop  traversal  for  INTER. 


Hence  the  three  artery  meetings  are  encoded  as: 

A:   INTER(2,3)  —  intersection  number  in  artery  3; 

INTER(1,1)  —  intersection  number  in  artery  1; 

B:   INTER(2,1)  —  intersection  number  in  artery  1; 

INTER(1,2)  —  intersection  number  in  artery  2; 

C:   INTER(2,2)  —  intersection  number  in  artery  2; 
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INTER (1,3)  —  intersection  number  in  artery  3. 

2.2.1.5  Outside  Variables. 

Altered:   None. 
Used:  None. 


2.2.2  Subroutine  MAXHD . 

2.2.2.1  Purpose. 

Writes  MAXBAND  heading  line. 

2.2.2.2  Synopsis. 

Writes  MAXBAND  heading  line, 

2.2.2.3  Subroutine  linkage. 

Called  by:  MAXBAND 
Calls:   None. 

2.2.2.4  Local  Variables. 
None. 

2.2.2.5  Outside  Variables. 

Altered:   None. 
Used:   None. 


2.2.3  Subroutine  MAXEND . 
2.2.3.  1  Purpose. 

Writes  MAXBAND  end  line. 

2.2.3.2  Synopsis. 

Writes  MAXBAND  end  line 

2.2.3.3  Subroutine  linkage. 

Called   by:     MAXBAND 
Calls:      None. 
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2.2.3.4  Local  Variables. 
None. 

2.2.3.5  Outside  Variables. 

Altered:      None. 
Used:      None. 
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CHAPTER  3 
THE  INPUT  MODULE 


The  INPUT  module  reads  the  input  cards  and  checks  them  for  errors.  If 
there  are  no  errors,  it  produces  an  input  data  summary.  The  structure  of 
the  module  is  shown  in  figure  3. 


3. 1  Input  and  Output. 

INPUT  reads  cards  on  FORTRAN  file  4  into  a  temporary  disk  file  on 
FORTRAN  file  5.  This  allows  it  to  use  the  BACKSPACE  command  when  reading 
card  images  from  FORTRAN  file  5.  INPUT  writes  its  output  on  FORTRAN  file 
6.   The  amount  of  output  is  partly  controlled  by  MESSL  and  WARNL. 


3.2  INPUT  Control  Subroutines. 

The  following  subroutines  form  the  control  section  of  the  INPUT  module, 


3.2.1  Subroutine  INPUT. 

3.2.1.1  Purpose. 

Provides  overall  control  of  the  INPUT  module. 

3. 2. 1 . 2  Synopsis. 

1.  IN  IT  sets  all  the  MAXBAND  and  INPUT  module  variables  to  0  or 
blanks,  depending  on  their  type. 

2.  IDATA  reads  the  data  from  the  input  cards  into  the  INPUT  card 
image  variables.  It  echoes  the  cards,  unless  otherwise 
requested . 

3.  Unless  there  were  errors  in  the  input  cards  (ERRCNTX)),  COMPTE 
converts  the  input  data  into  the  form  used  by  the  matrix 
generator  (MATGEN). 
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INIT 


Input 
Cards 


File  4 
MAXBAND  INPUT 


IDATA 


Card 
Images 


File  5 


COMPTE 


SUMARY 


Input  Card  Echoes 
& 
Warning  &  Error  Messages 


Error  Tally 
& 
Input  Data  Summary 


Data  Flow 


File  6 
MAXBAND  OUTPUT 


Control 


Figure  3:   The  INPUT  module. 
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4.   SUMARY  writes  a  tally  of  errors  found.   If  there  are  no  errors, 
an  input  data  summary  is  produced. 

3.2.1.3  Subroutine  linkage. 

Called   by:     MAXBAND 

Calls:      INIT,    IDATA,    COMPTE,    SUMARY 

3.2.1.4  Local  Variables. 

The  INPUT  module  has  two  kinds  of  local  variables. 

First  are  the  card  image  variables.  These  are  used  in  submodule  IDATA 
to  receive  values  directly  from  the  input  cards.  Later  these  values  will 
be  converted  or  copied  by  COMPTE  into  the  MAXBAND  variables  which  are 
passed  to  MATGEN. 

Second  are  variables  which  contain  information  which  is  not  removed 
directly  from  a  card  field.  These  variables  include  flags  and  indicators. 

Note  that  since  the  user  may  specify  that  only  some  of  the 
intersections  read  in  for  an  artery  be  included  in  the  analysis,  not  all 
of  the  data  in  the  input  cards  may  be  used.  Since  the  MAXBAND  variables 
used  in  MATGEN  contain  information  about  only  the  intersections  being 
analyzed,  some  of  the  MAXBAND  variables  have  surrogate  card  image 
variables  which  are  used  in  IDATA.  COMPTE  will  copy  only  some  of  the 
values  from  these  card  image  variables  into  the  MAXBAND  variables.  For 
example,  ISEQNO,  INODNO  and  IINAME  receive  values  from  the  input  cards 
which  are  later  copied  into  the  MAXBAND  variables  SEQNO,  NODENO  and  INAME. 

The  dimensions  of  the  INPUT  module  variables  follow  the  conventions 
discussed  in  chapter  1. 

Card  image  variables: 


Integer: 

ISEQNO (20,  3) 
IN  (3) 

FIRSTC3) 

LAST(3) 

LPAT(4,20,3) 


WARNL 


IINTERC6) 


Sequence  numbers  —  from  MAP  card. 

Number  of  intersections  in  each  artery  —  from 

SETUP  card. 
First  intersection  in  each  artery  to  be  used  in 

analysis  —  from  ARTERY  card. 
Last  intersection  in  each  artery  to  be  used  in 

analysis  —  from  ARTERY  card. 
Left  turn  choices  at  each  intersection  —  from 


LEFTPAT 
number. 
Values: 


card.   The  first  index  is  the  pattern 


0  -  pattern  not  chosen; 

1  -  pattern  chosen. 

Indicates  whether  warning  messages  are  printed  — 

from  START  card. 

Values:   0  -  printed; 

1  -  not  printed. 
Signal  numbers  at  the  three  artery  meetings  —  from 
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NLOOP 


LOOP1  card.   The  six  elements  correspond  to  the 
six  fields  on  the  card. 
Number  of  intersections  in  the  loop  —  from  SETUPL 
card. 


Real: 

SPEED(2,3) 


Artery-wide  speed   center  defaults   (mph  or     kph)      — 

from  ART2  card. 
Artery-wide  speed   tolerance  defaults   (mph     or     kph) 

—  from  ART2  card. 
Artery-wide  changes  in   speed   allowed   between     links 

(mph  or  kph)   —   from  ART2  card. 
Green   splits   (cycles)   —   from  SPECIFY  card. 
Left  splits   (cycles)   —   from  SPECIFY  card. 
LENGTH(4,20,3)     Approach  lengths   (feet  or  meters)      —     from     LENGTH 
card . 
Queue   clearance   (bandwidth  advance)    times     (cycles) 

—  from  QUEUE  card. 
Through  volumes  on     approaches     (vehicles/hour) 

from  VOLUME  card. 
Left  volumes  on  approaches   (vehicles/hour)    —     from 

VOLUME  card. 
Through  capacities  on  approaches   (vehicles/hour)    — 

from   CAPACITY  card. 
Left  capacities  on     approaches     (vehicles/hour)      — 

from   CAPACITY  card. 
Minimum   through     green     times        facing        approaches 

(cycles)   —   from  MINGREEN. 
Minimum   left  green  times  facing   approaches   (cycles) 

--   from  MINGREEN. 


T0L(2,3) 

CHG(2,3) 

G(4,20,3) 
IL(4,20,3) 


ITAU(4,20,3) 

TVOL(4,20,3) 

LVOL(4,20,3) 

TCAP(4,20,3) 

LCAP(4t20,3) 

TMING(4,20,3) 

LMING(4,20,3) 


Real*8: 

INODNO(20,3)  Node  numbers  —   from  MAP  card. 

IINAME(2,20,3)     Intersection  names  —   from     MAP     card.        The     first 

index      refers     to   first  or  last  8    characters   (name 

is  16  characters) . 


Other  local  variables: 


Integer: 
ISEQ(3) 

VOLFC(20,3) 
CAPFC(20,3) 
SPECFC(20,3) 
MINGFC(20,3) 


The  number  of  intersections  actually     read      in     for 

each  artery. 
VOLUME  card   flag. 
Values:      0  -  card   not  read; 
1    -  card   read. 
CAPACITY  card    flag. 
Values:      0  -  card  not  read; 
1    -  card  read. 
SPECIFY  card   flag. 
Values:      0  -  card   not  read; 
1    -  card   read. 
MINGREEN  card   flag. 
Values:      0  -  card  not  read; 
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1  -  card  read . 

DIRECT(2,3)     Outbound  and  inbound  directions  on  arteries. 
Values:   1  -  NB; 

2  -  SB; 

3  -  EB; 

4  -  WB. 
EOF                             End- of- file   flag. 

Values:      0  -  End-of-file  not  reached. 
1    -  End-of-file  reached. 
KFLAGC6)  Source  of  K's   flag. 

Values:      0  -  K's  given; 

1    -K's  computed . 
CFLAG(2,3)  Source  of  C's   flag. 

Values:      0  -  C's  given; 

1    -C's  computed . 
ISPEED(4,20,3)     The  array  of  final   values  for     the     speed     centers. 

It     contains     the  artery-wide  default  values,   plus 

any  overrides  on  specific     approaches     entered     on 

the   SPEED  card. 
IT0L(4, 20, 3)         The  array  of  final  values  for  the  speed  tolerances. 

It  contains  the  artery-wide  default     values,     plus 

any     overrides     on     specific  approaches  entered  on 

the   SPEED  card. 

3.2.1.5  Outside  Variables. 


Altered:      None. 

Used:      from  MAXBAND 


LOOP,  N,  METRIC,  LEFT,  INTER,  NODENO,  SEQNO, 
MAXRBB,  MAXIBB,  MAXITR,  MAXINV,  RESTRT, 
ERRCNT,  MESSL,  K,  C,  T,  R,  RBAR,  L,  LBAR, 
TAU,  TAUBAR,  D,  DBAR,  E,  EBAR,  F,  FBAR,  IG, 
IGBAR,  IH,  IHBAR,  LNAME,  ANAME,  INAME, 
ORIENT 


3.2.2     Subroutine  INIT. 

3.2.2.1  Purpose. 

Sets   all  MAXBAND  and    INPUT  module  variables  to  0   or  blanks. 

3.2.2.2  Synopsis. 

Integer  and   Real   variables  are  set  to  0;      Real*8   variables  are     set     to 
blanks . 

3.2.2.3  Subroutine  linkage. 

Called  by:   INPUT 
Calls:  None. 
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3.2.2.4  Local  Variables. 


Integer: 
I 

SEQ 
ART 

Real*8: 
BLANK 


Iteration  variable. 
Iteration  variable  - 
Iteration  variable  - 


-  number  of  intersection. 

-  number  of  artery. 


Contains  8  blanks  (X40) 


3.2.2.5  Outside  Variables. 

Altered:   from  INPUT  —  WARNL,  EOF,  NLOOP,   IINTER,   KFLAG,   ISEQ,   IN, 

FIRST,  LAST,  DIRECT,  CFLAG,  INODNO,  ISEQNO, 
VOLFC,  CAPFC,  SPECFC,  MINGFC,  LPAT,  SPEED, 
TOL,  CHG,  G,  IL,  LENGTH,  ISPEED,  ITOL,  ITAU, 
TVOL,  LVOL,  TCAP,  LCAP,  TMING,  LMING,  IINAME 
from  MAXBAND  —  LOOP,  N,  METRIC,  LEFT,  INTER,  NODENO,  SEQNO, 
MAXRBB,  MAXIBB,  MAXITR,  MAXINV,  RESTRT, 
ERRCNT,  MESSL,  K,  C,  T,  R,  RBAR,  L,  LBAR, 
TAU,  TAUBAR,  D,  DBAR,  E,  EBAR,  F,  FBAR,  IG, 
IGBAR,  IH,  IHBAR,  LNAME,  ANAME,  INAME, 
ORIENT 


3.  3  Data  Entry  Subroutines. 
3.3.1  Subroutine  IDATA. 
3.  3.  1.  1  Purpose. 

Controls  the  reading  of  the  input  cards. 
3.  3.  1.2  Synopsis. 

1.  DISKF  reads  the  cards  from  FORTRAN  file  4  and  places  their 
images  in  a  temporary  disk  file  on  FORTRAN  file  5.  The  rest  of 
the  subroutines  of  IDATA  read  from  FORTRAN  file  5.  This  allows 
MAXBAND  to  use  the  BACKSPACE  command  while  processing  the  card 
images. 

2.  CHEAD  prints  the  'MAXBAND  INPUT  CARDS'  heading. 

3.  Reads  the  first  card  of  the  deck. 

4.  If  the  card  is  a  START  card,  IDATA  calls  CSTART  and  reads  the 
next  card.  Otherwise,  MESSL  and  WARNL  are  set  to  default  values 
and  a  warning  message  is  printed. 

5.  If  the  next  card  is  MPCODE,  IDATA  calls  CMPCOD  and  reads  the 
next  card.   Otherwise,  MAXRBB,  MAXIBB,  MAXITR,  MAXINV  and  RESTRT 
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are  set  to  their  default  values. 

6.  If  the  card  is  SETUP,  IDATA  calls  CSETUP,  reads  the  next  card, 
sets  the  loop  indicator,  LOOP,  to  0,  and  calls  RART  to  process 
the  artery  cards.  If  the  card  is  SETUPL,  IDATA  calls  CSETL  and 
RLOOP  instead  and  sets  LOOP  to  1.  Otherwise,  an  error  message 
is  printed   and   ERRCNT  is   incremented. 

Note  that     a     check     is     made     after     every     call     to      RCARD     for       the 
end-of-file.      IDATA  exits  if  the  end-of-file  is  encountered. 

3.3.1.3  Subroutine  linkage. 

Called  by:   INPUT  - 

Calls:   DISKFL,  CHEAD,  RCARD,  CSTART,  CMPCOD,  CSETUP,  CSETL,   RART, 
RLOOP 

3.3.1.4  Local  Variables. 

Real*8: 

NAME  Holds  the  8    character  card   name. 

START  The  word    'START'. 

MPCODE  The  word    'MPCODE'. 

SETUP  The  word    'SETUP'. 

SETUPL  The  word    'SETUPL'. 

3.3.1.5  Outside  Variables. 

Altered:   from  INPUT  —  WARNL 

from  MAXBAND  —  MESSL,   MAXRBB,   MAXIBB,   MAXITR,    MAXINV, 
RESTRT,  ERRCNT,  LOOP 
Used:   from  INPUT  —  FIRST,  LAST,  ISEQ,  IN,  SPEED,  TOL,  CHG,  INODNO, 

ISEQNO,  IINAME,  G,  IL,  LENGTH,  LPAT,  ISPEED, 
ITOL,  ITAU,  TVOL,  LVOL,  TCAP,   LCAP,   TMING, 
LMING,   DIRECT,   EOF,   NLOOP,  IINTER,  VOLFC, 
CAPFC,  SPECFC,  MINGFC 
from  MAXBAND  —  T,  K,  C,  METRIC,  ORIENT,  ANAME,  LNAME 


3.3.2  Subroutine  DISKFL. 

3.3.2.1  Purpose. 

Copies  physical  cards  to  temporary  disk  file. 

3. 3. 2. 2  Synopsis. 

The  subroutines  of  the  IDATA  submodule  use  the  BACKSPACE  command  when 
reading  card  images  from  FORTRAN  file  5.  In  some  systems,  this  command 
may  not  be  compatible  with  the  physical  card  reader.  DISKFL  copies  the 
physical     cards     from     FORTRAN     file  4  to   a  temporary  disk  file  on  FORTRAN 
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file  5.   This  disk  file  is  then  read  by  the  IDATA  subroutines, 

3.3.2.3  Subroutine  linkage. 

Called  by:      IDATA 
Calls:      None. 

3.3.2.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real: 

RD(20)  An  80  byte  card   image. 

3.3.2.5  Outside  Variables. 

Altered:  None. 
Used:  None. 


3.3.3  Subroutine  CHEAP. 
3.  3.  3.  1  Purpose. 

Writes  the  'MAXBAND  INPUT  CARDS'  heading. 
3.  3.  3.2  Synopsis. 

Writes  the  'MAXBAND  INPUT  CARDS'  heading  (1000) 

3.3.3.3  Subroutine  linkage. 

Called  by:      IDATA 
Calls:      None. 

3.3.3.4  Local  Variables. 
Integer: 

Real: 

3.3.3.5  Outside  Variables. 

Altered:      None. 
Used:     None. 
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3.3.4  Subroutine  RART . 


3.  3.  4.  1  Purpose. 


Reads  in  all  the  cards  for  an  artery  following  SETUP,  SETUP  1,  SETUP2  or 
SETUP3. 

3.  3.  4.2  Synopsis. 


1.  If  the  next  card  is  ARTERY,  RART  calls  CART  and  reads  the  next 
card.  Otherwise,  it  prints  an  error  message,  increments  ERRCNT 
and  exits. 

2.  If  the  next  card  is  ART2,  RART  calls  CART2  and  reads  the  next 
card.  Otherwise,  it  prints  an  error  message,  increments  ERRCNT 
and  exits. 

3.  If  the  next  card  is  MAP,  RART  calls  DOCRDS  to  read  the  signal 
and  approach  specific  cards  for  the  artery.  Otherwise,  an  error 
condition  is  indicated  and  RART  exits. 

4.  After  all  the  signal  and  approach  specific  cards  have  been  read, 
RART  checks  that  the  number  of  intersections  actually  entered, 
SEQ,  is  in  the  range  2-20  for  a  single  artery  and  2-16  for  a 
loop.  If  SEQ  is  not  in  these  ranges,  RART  indicates  an  error 
and  exits. 

5.  RART  prints  a  warning  message  if  SEQ  does  not  agree  with  the 
number  of  intersections  entered  on  the  SETUP  or  SETUPi  (i=1,2  or 
3)  card. 

6.  The  value  of  SEQ  is  saved  in  ISEQ(ART). 

Note  that  if,  during  any  attempt  to  read  a  card,  the  end-of-file  is 
encountered,  RART  exits. 

3.3.4.3  Subroutine  linkage. 

Called  by:   IDATA,  RLOOP 

Calls:   CART,  RCARD,  CART2,  DOCRDS 

3.3.4.4  Local  Variables. 


Integer: 

SEQ 

Number  of  interse 

artery. 

Real*8: 

ARTERY 

The  word  'ARTERY'. 

ART2 

The  word  'ART2'. 

MAP 

The  word  'MAP'. 
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3.3.^.5  Outside  Variables. 

Altered:  from  INPUT  —  ISEQ 

from  MAXBAND  —  ERRCNT 
Used:   from  IDATA  —  ART  (passed  as  a  value),  NAME 

from  RLOOP  —  ART 

from  INPUT  —  FIRST,  LAST,  IN,  SPEED,  TOL,  CHG,  INODNO, 
ISEQNO,  IINAME,  G,  IL,  LENGTH,  LPAT,  ISPEED, 
ITOL,  ITAU,  TVOL,  LVOL,  TCAP,  LCAP,  TMING, 
LMING,  DIRECT,  WARNL,  EOF,  NAME,  VOLFC, 
CAPFC,  SPECFC,  MINGFC 

from  MAXBAND  —  T,  K,  C,  MESSL,  LOOP 

Note:  ART  can  be  from  IDATA  or  RLOOP,  depending  on  whether  the  problem 
is  a  single  artery  or  a  loop. 


3.3.5  Subroutine  DOCRDS . 

3.  3.  5.  1  Purpose. 

Reads  all  the  cards  for  an  artery  after  ART2. 

3.  3.  5.2  Synopsis. 

DOCRDS  read  cards  until  END,  SETUP2,  SETUP3  or  end-of-file  is 
encountered.  The  information  on  cards  which  appear  between  two  successive 
MAP  cards  is  assigned  to  the  intersection  identified  on  the  first  MAP 
card.  Cards  which  appear  between  two  successive  MAP  cards  may  be  entered 
in  any  order. 

Steps: 


1.  SEQ  is  set  to  1,  and  the  flags  LENGF  to  LEFTPF  and  VOLFC  to 
MINGFC  are  set  to  0. 

2.  CMAP  gets  the  information  from  the  last  card  read,  which  should 
be  a  MAP  card. 

3.  The  next  card  is  read.  If  it  is  END,  SETUP2,  SETUP3  or  if 
end-of-file  is  encountered,  CKFLAG  is  called  and  DOCRDS  exits. 
Otherwise,    if  the  next  card    is 

a)  MAP  —  CKFLAG  is  called,    SEQ  is   incremented      and      CMAP 
is  called; 

b)  SPECIFY  —  CSPEC   is  called; 

c)  LENGTH  —  CLENGT   is  called; 

d)  LEFTPAT  —  CLEFTP  is  called; 
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e)  SPEED  —  CSPEED  is  called; 

f)  QUEUE  —  CQUEUE  is  called; 

g)  VOLUME  —  CVOL  is  called; 
h)      CAPACITY  —  CCAP  is  called; 
i)      MINGREEN  —  CMING  is  called; 

and   step  3  is  repeated. 

If  the  card   is  not  any  of  the  above, 
printed   and   step  3  is  repeated. 


a     warning     message     is 


3.3.5.3  Subroutine  linkage. 

Called  by:   RART 

Calls:   CMAP,  RCARD,  CKFLAG,  CSPEC,  CLENGT,  CLEFTP,  CSPEED,  CQUEUE, 
CVOL,  CCAP,  CMING 

3.3.5.4  Local  Variables. 
Card  type  flags: 

These  flags  have  values: 

0  -  card  not  read; 

1  -  card  read . 


Integer: 

LENGF 

LENGTH  card   flag. 

VOLF 

VOLUME  card   flag. 

CAPF 

CAPACITY  card    flag. 

SPECF 

SPECIFY  card   flag. 

MINGF 

MINGREEN  card   flag. 

SPEEDF 

SPEED 

card    flag. 

QUEUEF 

QUEUE 

card   flag. 

LEFTPF 

LEFTPAT  card   flag. 

Alphanumeric 

constants: 

Real*8: 

MAP 

Word 

MAP*. 

END 

Word 

END'. 

SETUP2 

Word 

SETUP2'. 

SETUP 3 

Word 

SETUP3'. 

SPECFY 

Word 

SPECIFY'. 

LENG 

Word 

LENGTH'. 

LEFTPT 

Word 

LEFTPAT'. 

SPD 

Word 

SPEED'. 

QUEUE 

Word 

QUEUE'. 

VOLUME 

Word 

VOLUME'. 

CPCITY 

Word 

CAPACITY'. 
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MINGRN        Word  'MINGREEN'. 

3.3.5.5  Outside  Variables. 

Altered:   from  RART  —  SEQ 

from  INPUT  —  VOLFC,  CAPFC,  SPECFC,  MINGFC 
Used:   from  IDATA  -—  ART  (passed  as  a  value  to  RART),  NAME 
from  RLOOP  —  ART 

from  INPUT  —  INODNO,  ISEQNO,  WARNL,  EOF,   DIRECT,   LPAT,   G, 
IL,   LENGTH,  ISPEED,  ITOL,  ITAU,  TVOL,  LVOL, 
TCAP,  LCAP,  THING,  LMING,  IINAME 
from  MAXBAND  —  LOOP,  MESSL,  ERRCNT 

Note:  ART  is  taken  from  IDATA  or  RLOOP  depending  on  whether  the 
problem  is  a  single  artery  or  a  loop. 


3.3.6  Subroutine  RLOOP  . 
3.  3.  6.  1  Purpose. 

Reads  in  all  the  cards  for  a  loop  after  the  SETUPL  card. 
3. 3. 6.2  Synopsis. 


1.  If  the  last  card  read  is  L00P1,  RLOOP  calls  CLOOP1  and  reads  the 
next  card.  Otherwise,  an  error  condition  is  indicated  and  RLOOP 
exits. 

2.  If  the  next  card  is  L00P2,  CLOOP2  is  called  and  the  next  card  is 
read.  Otherwise,  K(4)  -  K(6)  are  set  to  their  default  values. 

3.  For  each  artery,  RLOOP  looks  for  the  appropriate  SETUPi  card 
(i=1,2  or  3 ) .  If  the  card  is  present,  the  next  card  is  read  and 
RART  is  called  for  the  artery.  Otherwise,  an  error  condition  is 
indicated  and  RLOOP  exits. 

4.  A  warning  message  is  printed  if  NLOOP  does  not  agree  with  the 
number  of  intersections  actually  read  in  for  the  loop. 

Note:  if  the  end-of-file  is  encountered  when  attempting  to  read 
card,  RLOOP  exits. 


3.3.6.3  Subroutine  linkage. 

Called  by:   IDATA 

Calls:   CL00P1,  CL00P2,  RCARD,  CSETUP,  RART 
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3.3.6.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

Real: 

TDUM(2)       Dummy  variable  used  when  calling  RART  to  replace 
T(2). 

Literal  Constants: 


Real*8: 

L00P1 

Word 

'L00P1'. 

L00P2 

Word 

'L00P2'. 

SETUP  1 

Word 

'SETUP1'. 

SETUP2 

Word 

'SETUP2'. 

SETUP3 

Word 

'SETUP3'. 

3.3.6.5  Outside  Variables. 

Altered:   from  MAXBAND  —  K,  ERRCNT 
Used:   from  IDATA  —  NAME 

from  INPUT  —  FIRST,  LAST,  IN,  SPEED,  TOL,  CHG,  INDONO, 
ISEQNO,  IINAME,  G,  IL,  LENGTH,  LPAT,  ISPEED, 
ITOL,  ITAU,  TVOL,  LVOL,  TCAP,  LCAP,  TMING, 
LMING,  DIRECT,  WARNL,  EOF,  NLOOP,  IINTER, 
ISEQ,  VOLFC,  CAPFC,  SPECFC,  MINGFC,  DIRECT, 
WARNL,  EOF,  NLOOP,  IINTER,  ISEQ 
from  MAXBAND  —  T,  C,  MESSL,  LOOP,  METRIC,  ANAME,  ORIENT 


3.3.7  Subroutine  RCARD . 
3.  3.  7.  1  Purpose. 

Reads  cards;  prints  them  if  MESSL  is  0  or  3;   checks  for  legal   names, 
3. 3. 7.2  Synopsis. 

1.  RCARD  reads  the  next  card  in  the  input  deck. 

2.  If  the  message  level  (MESSL)  is  0  or  3,  the  card  is  printed  in 
the  output. 

3.  If  the  card  is  COMM,  RCARD  goes  back  to  step  1. 

4.  RCARD  checks  the  name  of  the  card  for  validity.  If  the  name  is 
bad,  an  error  condition  is  indicated,  and  RCARD  goes  back  to 
step  1. 
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5.  When  the  end  of  the  deck  is  reached,  two  things  may  happen: 

a)  If  DOEND  is  0,  the  end  has  been  reached 
prematurely,  and  an  error  condition  is  indicated. 

b)  If  DOEND  is  1,  the  deck  may  end  at  this  point,  but 
since  an  END  card  has  not  been  read,  a  warning 
message  is  produced. 

3.3.7.3  Subroutine  linkage. 

Called  by:   IDATA,  RART,  DOCRDS,  RL00P 
Calls:  None. 

3.3.7.4  Local  Variables. 
Literal  Constants: 


Real*8: 

COMM 

Word  ' 

COMM' . 

START 

Word 

START1. 

MPCODE 

Word 

MPCODE  ' . 

SETUPL 

Word 

SETUPL'. 

SETUP  1 

Word 

SETUP 1». 

SETUP2 

Word 

SETUP2'. 

SETUP 3 

Word 

SETUP3'. 

SETUP 

Word 

SETUP'. 

L00P1 

Word 

L00P1'. 

L00P2 

Word 

L00P2'. 

ARTERY 

Word 

ARTERY'. 

ART2 

Word 

ART2'. 

MAP 

Word 

MAP. 

VOLUME 

Word 

VOLUME'. 

CPCITY 

Word 

CAPACITY'. 

MINGRN 

Word 

MINGREEN'. 

SPECFY 

Word 

SPECIFY'. 

SPEED 

Word 

SPEED'. 

QUEUE 

Word 

'QUEUE'. 

LENGTH 

Word 

•LENGTH'. 

LEFTPT 

Word 

'LEFTPAT'. 

END 

Word 

•END'. 

Other  local 

variables: 

Real*8: 

C0MMNT(9)     Columns  9-80  of  the  card. 

3.3.7.5  Outside  Variables. 

Altered:   from  IDATA,  RART,  DOCRDS,  RLOOP  - 

value  to  RCARD) 
from  IDATA  —  NAME 
from  INPUT  —  EOF 


DOEND   (passed   as  a 
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from  MAXBAND  —  ERRCNT 
Used:   from  INPUT  —  WARNL 

from  MAXBAND  —  MESSL 


Note:  The  value  of  DOEND  is  set  to  0  or  1  when  a  subroutine  passes 
the  value  0  or  1  to  RCARD  in  the  argument  list  of  its  CALL  statement. 
DOEND  is  a  declared  variable  only  in  RCARD. 


3.3.8  Subroutine  CSTART . 
3.  3.  8.  1  Purpose. 

Reads  information  from  START  card. 
3.  3.  8.2  Synopsis. 

1.  The  message  level,  MESSL,  is  read.  If  it  is  not  0,1,2,  or  3,  it 
is  set  to  the  default  value  of  0  and  a  warning  message  is 
printed. 

2.  The  warning  level,  WARNL,  is  read.  It  must  be  0  or  1 .  If  not, 
it  is  set  to  its  default  value  of  0,  and  a  warning  message  is 
printed. 

Note  that  a  blank  for  MESSL  or  WARNL  is  read  as  a  0. 

3.3.8.3  Subroutine  linkage. 

Called  by:   IDATA 
Calls:   None. 

3.3.8.4  Local  Variables. 
None. 

3.3.8.5  Outside  Variables. 

Altered:      from   INPUT   —  WARNL 

from  MAXBAND   —  MESSL 
Used:     None. 


3.3.9     Subroutine  CMPCOD. 
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3.  3.  9. 1  Purpose. 

Reads  information  from  the  MPCODE  card. 
3.3.9.2  Synopsis. 


1.  CMPCOD  reads  the  MPCODE  parameters  MAXRBB,   MAXIBB,   MAXITR, 
MAXINV  and  RESTRT. 

2.  If  any  of  the  parameters  is  blank,  it  is  set  to   its  default 
v  al ue . 

3.  An  error  condition  is  indicated  if  any  of  the  parameters  is  not 
in  its  proper  range. 

3.3.9.3  Subroutine  linkage. 

Called  by:      IDATA 
Calls:      None. 

3.3.9.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real*8: 

SPACEC5)      Contains  alphanumeric  contents  of  card  fields. 
BLANK        Contains  5  blanks. 

3.3.9.5  Outside  Variables. 

Altered:   from  MAXBAND  —  MAXRBB,   MAXIBB,   MAXITR,   MAXINV,   RESTRT, 

ERRCNT 
Used:  None. 


3.3.10  Subroutine  CSETUP . 
3.  3.  10. 1  Purpose. 

Reads  information  from  SETUP,  SETUP  1,  SETUP2  and  SETUP3  cards. 
3.3. 10.2  Synopsis. 

1.   For  the  current  artery  ART,  CSETUP  reads: 

a)  the  number  of  intersections  to  be  entered   (IN(ART)); 

b)  the  units  to  be  used  ( METRIC ( ART)) ; 
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c)  the  direction  from     which     intersections     are     entered 
(ORIENT(ART));      and 

d)  the  name  of  the   artery   (ANAMECI,  ART)  ,1=1 ,  2) . 

2.  Indicates  an  error  if  IN (ART)  is  not  in  the  range  2-20  for  an 
artery  problem  or  2-16  for  a  loop  problem. 

3.  Sets  up  the  array  DIRECT(2,3)  which  indicates  the  outbound  and 
inbound  directions.  If  ORIENT(ART)  is  not  N,  S,  E  or  W,  an 
error  condition  is  indicated. 

3.3.10.3  Subroutine  linkage. 

Called  by:   IDATA,  RLOOP 
Calls:   None. 

3.3.10.4  Local  Variables. 


Integer: 
I 

Iteration  v 

Real*8: 
LETS 
LETN 
LETW 
LETE 

Letter  'S'. 
Letter  'N'. 
Letter  »W' . 
Letter  'E'. 

3.3.10.5  Outside  Variables. 

Altered:   from  INPUT  —  IN,  DIRECT 

from  MAXBAND  —  METRIC,  ORIENT,  ANAME,  ERRCNT 

Used:   from  IDATA  (passed  a  value  to  RART)  or  RLOOP  —  ART 

from  MAXBAND  —  LOOP 


3.3.11   Subroutine  CSETL . 
3.  3.  1 1 .  1  Purpose. 

Reads  information  from  the  SETUPL  card. 
3. 3. 11 .2  Synopsis. 


1.  Reads  the  number  of  intersections  in  the  loop  to  be  entered 
(NL00P)  and  the  name  of  the  loop  (LNAMEU  )  ,1  =  1 ,  2) . 

2.  If  NLOOP  is  not  in  the  range  3-17,   an  error  condition  is 
indicated. 
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3.3.11.3  Subroutine  linkage. 

Called  by:   IDATA 
Calls:  None. 

3.3.11.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

3.3.11.5  Outside  Variables. 

Altered:      from   INPUT   —  NLOOP 

from  MAXBAND   —  LNAME,    ERRCNT 
Used:      None. 


3.3.12     Subroutine  CART. 
3.  3.  12.  1   Purpose. 

Reads  information   from  the  artery  card. 
3. 3. 12. 2  Synopsis. 

1.  For  the  current  artery  ART,    CART  reads: 

a)  The  lower  and  upper  cycle  time  limits  in  seconds  (TO) 
and  T(2)).  In  a  loop,  T(1 )  and  T(2)  are  called  as  the 
dummy  variables  TDUMO)  and  TDUM(2),  whose  values  are 
ignored . 

b)  The  first  (FIRST(ART))  and  last  (LAST(ART))  of  the 
intersections  read  in  to  be  included  in  the  analysis. 
The  artery  to  be  analyzed  will  consist  of  the 
intersections  whose  numbers  are 
FIRST (ART),  FIRST (ART)  +  1  .... .LAST (ART)  -  1,  LAST (ART 
). 

2.  Sets   FIRST(ART)   or   LAST(ART)   to      its     default     value      if     it     is 
blank. 

3.  If,   for  a  single  artery,  both  TO  )   and  T(2)   are  not  greater  than 
0,    indicate  an  error  and   skip  step  4. 

4.  If,   for  a  single  artery,   TO)   is  greater  than  T(2),   indicate     an 
error. 

5.  Indicate  an  error  and   exit  if  FIRST(ART)   <   1 ,    or  LAST(ART)   >     20 
for  a  single  artery  or  >   16  for  a  loop. 
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6.  Indicate   an  error  and   exit   if  FIRST(ART)    >_LAST(ART). 

7.  Print  a  warning  message  if  LAST(ART)  >  IN(ART). 

3.3.12.3  Subroutine  linkage. 

Called  by:  RART 
Calls:   None. 

3.3.12.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real*8: 

SPACE(2)  Contains  alphanumeric     contents     of     FIRST(ART)        and 

LAST (ART)    fields  of  ARTERY  card. 
BLANK  Contains  8    blanks. 

3.3.12.5  Outside  Variables. 

Altered:   from  INPUT  —  FIRST,  LAST 
from  MAXBAND  —  T,  ERRCNT 
Used:   from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  IN,  WARNL 
from  MAXBAND  —  LOOP 


3.3.13  Subroutine  CART2  . 

3.3.13.1  Purpose. 

Reads  information  from  ART2  card. 

3. 3. 13. 2  Synopsis. 

1.  For  the  current  artery  ART,    read: 

a)  The  target  bandwidth  ratio,  inbound  to  outbound 
(K(ART)); 

b)  The  objective  function  weights  CO.ART)   and     C(2,ART); 

c)  The  artery-side  defaults  for  the  outbound  and  inbound 
speed  centers,  tolerances  and  allowed  changes  in  speed 
between  links  (SPEEDU  ,  ART) ,  TOL(I.ART),  CHG(I,ART), 
1=1,2). 

2.  Indicate  an  error  if  speed  center  information   (SPEED(I, ART))    has 
not  been  entered   for  at  least  one  direction. 
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3.  Set  default  values  for  any  variables  with  blank  fields. 

4.  Indicate  an  error  if  either  speed  center  is  £  0,  or  if  any  of 
the  tolerances  or  changes  is  <  0.  However,  there  is  no  error  if 
both  speed  center  fields  are  blank  —  this  error  has  already 
been  indicated  in  step  2. 

5.  If  a  valid  input  direction  has  been  indicated  on  the  SETUP, 
SETUP  1,  SETUP2  or  SETUP3  card,  enter  the  artery-wide  defaults 
for  speed  centers  and  tolerances  into  the  speed  center  and 
tolerance  arrays  (ISPEED(2, 20, 3)  and  IT0L(2, 20, 3)) . 

3.3.13.3  Subroutine  linkage. 

Called  by:   RART 
Calls:  None. 

3.3.13.4  Local  Variables. 


Integer: 
I 
OUT 

IN 

Real*8: 

KSPACE 


Iteration  variable. 

Number  of  outbound  direction  (1,2,3  or  4  for  N,S,E  or 

W). 
Number  of  inbound  direction. 


CSPACE(2) 
SPDSPC(2) 
T0LSPC(2) 
CHGSPC(2) 
BLANK 
3.3.13.5  Outside  Variables. 


Contains  alphanumeric  contents  of  K  field  on  ART2 

card . 
Contains  alphanumeric  contents  of  C  fields  on  ART2 

card . 
Contains  alphanumeric  contents  of  speed  fields  on 

ART2  card. 
Contains  alphanumeric  contents  of  tolerance  fields  on 

ART2  card. 
Contains  alphanumeric  contents  of  change  fields  on 

ART2  card. 
Contains  8  blanks  (X40). 


Altered:   from  INPUT  —  SPEED,  TOL,  CHG,  ISPEED,  ITOL 
from  MAXBAND  —  K,  C,  ERRCNT 
Used:  from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  DIRECT 


3.3.14  Subroutine  CL00P1  . 
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3.3.  14.  1  Purpose. 

Reads  information  from  L00P1  card. 
3.3. 14.2  Synopsis. 


1.  CL00P1  reads  the  lower  and  upper  cycle  time  limits  in  seonds  for 
the  loop  (T(1)  and  T(2))  and  the  intersection  numbers  at  the 
artery  meetings  (IINTER). 

2.  An  error  is  indicated  if  either  T(1  )  _<  0  or  T(2)  _<  0,  or  if  T(1  ) 
>  T(2). 

3.  An  error  is  indicated  if  IINTERO  )  -  IINTER(6)  are  not  in  the 
range  1-16. 

3.3.14.3  Subroutine  linkage. 

Called  by:  RLOOP 
Calls:  None. 

3.3.14.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

3.3.14.5  Outside  Variables. 

Altered:     from  INPUT  —  IINTER 

from  MAXBAND  —  T,  ERRCNT 
Used:   None. 


3.3.15  Subroutine  CL00P2 . 
3.  3.  15.  1  Purpose. 

Reads  information  from  the  L00P2  card. 

3. 3. 15. 2  Synopsis. 

Reads  the  cross  artery  targent  bandwidth  ratios  K(4)  -  K(6).   Each  of 
these  defaults  to  0  if  its  field  is  blank. 

3.3.15.3  Subroutine  linkage. 

Called   by:      DOCRDS 
Calls:      None. 


40  - 


3.3.15.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

3.3.15.5  Outside  Variables. 

Altered:   from  MAXBAND  —  K 
Used:  None. 


3.3.16  Subroutine  CMAP . 
3.  3. 16.  1  Purpose. 

Reads  information  from  MAP  card. 
3. 3. 16.2  Synopsis. 


1.  For  the  current  intersection  SEQ  of  the  current  artery  ART, 
reads  the  node  number  INODNO,  the  sequence  number  ISEQNO  and  the 
cross-street  name  IINAME. 

2.  If  ISEQNO  is  not  in  the  range  1-20  for  a  single  artery  and  1-26 
for  a  loop,  CMAP  prints  a  warning  message. 

3.  If  the  sequence  number  of  the  first  intersection  is  not  1,  a 
warning  message  is  printed. 

4.  If  the  sequence  number  of  the  current  intersection  is  not  1 
greater  than  the  sequence  number  of  the  previous  intersection, 
CMAP  prints  a  a  warning  message. 

Called  by:   RART,  DOCRDS 
Calls:   None. 

3.3.  16.  3  Local  Variables. 

Integer: 

I  Iteration  variable. 

SEQM 1        SEQ  -  1 . 

3.  3.16.4  Outside  Variables. 

Altered:   from  INPUT  —  INODNO,  ISEQNO,  IINAME 

Used:   from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 

from  RART  —  SEQ 

from  INPUT  —  WARNL 

from  MAXBAND  —  LOOP 
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3.3.17  Subroutine  CKFLAG . 


3.3.  17. 1  Purpose. 


Checks  whether  sufficient  information  has  been  read  for  previous 
intersection  and  resets  the  card  type  flags. 

3. 3. 17.2  Synopsis. 


1.  Indicate  an  error  if  a  LENGTH  card  was  not  read. 

2.  Indicate  an  error  if  neither  a  SPECIFY     card     nor     the     pair     of 
cards  VOLUME  and   CAPACITY  was  read. 

3.  Set   the   MAXBAND  module  card   type   flags  for  this   intersection  and 
artery,    VOLFC(SEQ,  ART)   -  MINGFCCSEQ,  ART) . 

4.  Reset  the  DOCRDS  card   type   flags,    LENGF   -  LEFTPT. 

3.3.17.3  Subroutine  linkage. 

Called  by:     DOCRDS 
Calls:      None. 

3.3.17.4  Local  Variables. 
None. 

3.3.17.5  Outside  Variables. 

Altered:   from  DOCRDS  —  LENGF,   VOLF,   CAPF,   SPECF,   MINGF,   SPEEDF, 

QUEUEF,  LEFTPF 
from  INPUT  —  VOLFC,  CAPFC,  SPECFC,  MINGFC 
from  MAXBAND  —  ERRCNT 
Used:   from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 


3.3.18  Subroutine  CSPEC . 
3.3.18.1  Purpose. 

Reads  information  from  SPECIFY  card. 
3.  3.  18.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  SPECIFY  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  SPECIFY 
card  type  flag  SPECF. 
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2.  Reads  the  green   (G)   and   left   (IL)   splits  in  cycles  for  all     four 
directions. 

3.  Exits  if  the  entry  direction  on  the  SETUP  card   is  bad. 

4.  There  is  an  error  if  both  main  street     green     split     fields     are 
blank. 

5.  Sets  variables  with  blank  fields  to   the  defaults. 

6.  There  are  errors  if  any  of  the  green  or     left     splits     are     less 
than  0. 

7.  There  is  an  error  if  the  sum  of     the     splits     exceeds     1      cycle, 
according   to  MAXBAND's  split  model. 

3.3.18.3  Subroutine  linkage. 

Called  by:   DOCRDS 
Calls:   None. 

3.3.18.4  Local  Variables. 


Integer: 
I 
OUT 

IN 


Iteration  variable. 

Number  of  outbound  direction  — 

(1,2,3  or  4  for  N.S.E  or  W)  . 
Number  of  inbound  direction. 


Real 


PHASE  1 


Length  in  cycles  of  the  main  street  phase     (according 
to   MAXBAND's  split  model). 


Real*8: 

TSPACE(4) 


LSPACE(4) 
BLANK 
3.3.18.5  Outside  Variables. 


Alphanumeric  contents  of  through  split  fields  of 

SPECIFY  card. 
Alphanumeric  contents  of  left  split  fields  of  SPECIFY 

card . 
8  blanks  (X40). 


Altered:      from  DOCRDS   —  SPECF 
from   INPUT   —  G,    IL 
from  MAXBAND   —  ERRCNT 
Used:      from   RART   —  SEQ 

from  IDATA    (passed   as  a  value  to   RART)  OR   RLOOP  —  ART 
from   INPUT   DIRECT,    WARNL 
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3.3.19  Subroutine  CLENGT . 
3.3. 19. 1  Purpose. 

Reads  information  from  LENGTH  card. 
3.3.  19.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  LENGTH  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  LENGTH 
card  type  flag  LENGF . 

2.  Reads  the  lengths  of  the  four  intersection  approaches  (LENGTH) 
in  feet  or  meters. 

3.  Exits  if  the  direction  entered  on  the  SETUP  card  is  bad. 

4.  There  is  an  error  if  a  intersection  other  than  the  first  has  a 
blank  outbound  approach  length  field. 

5.  If  the  inbound  approach  field  is  blank,  a  -1  is  entered  in  the 
appropriate  element  of  the  LENGTH  array.  The  correct  length 
will  be  substituted  later  by  the  SETDST  routine. 

6.  There  is  an  error  if  any  lengths  which  have  been  entered,  other 
than  for  the  outbound  approach  to  the  first  intersection,  are 
not  positive. 

3.3.19.3  Subroutine  linkage. 

•  Called  by:     DOCRDS 
Calls:      None. 

3.3.19.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

OUT  Number  of  outbound  direction  — 

(1,2,3  or  4  for  N,S,E  or  W)  . 
IN  Number  of  inbound  direction. 

Real*8: 

LENGTS(4)     Alphanumeric  contents  of  LENGTH  card  fields. 
BLANK        8  blanks  (X40). 

3.3.19.5  Outside  Variables. 

Altered:   from  DOCRDS  —  LENGF 
from  INPUT  —  LENGTH 
from  MAXBAND  —  ERRCNT 
Used:   from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
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from  INPUT  —  DIRECT,  WARNL 


3.3.20  Subroutine  CLEFTP . 

3.3.20.1  Purpose. 

Reads  information  from  LEFTPAT  card. 

3.3.20.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  LEFTPAT  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  LEFTPAT 
card  type  flag  LEFTPF . 

2.  Reads  the  choice  of  left  turn  patterns  by  the  user  into  LPAT. 

3.  If  any  field  contains  a  value  other  than  0  or  1 ,  the 
corresponding  element  of  LPAT  is  set  to  0  and  a  warning  message 
is  printed.  Note  that  blank  fields  are  read  as  0's. 

3.3.20.3  Subroutine  linkage. 

Called  by:     DOCRDS 
Calls:      None. 

3.3.20.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

BAD  Set  to  1  if  entry  data  is  bad. 

3.3.20.5  Outside  Variables. 

Altered:   from  DOCRDS  —  LEFTPF 
from  INPUT  —  LPAT 
Used:  from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  WARNL 


3.3.21  Subroutine  CSPEED. 
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3.  3.21 .  1  Purpose. 

Reads  information  from  the  SPEED  card. 
3.3.21.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  SPEED  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  SPEED  card 
type  flag  SPEEDF. 

2.  Reads  speeds  (NSPEED)  and  tolerances  (NTOL)  for  all  four 
directions. 

3.  Reads  alphanumeric  contents  of  the  eight  cards  fields  into 
SSPACE  and  TSPACE. 

4.  Exits  if  the  direction  entered  on  the  SETUP  card  is  bad. 

5.  Updates  the  values  in  the  final  speed  (ISPEED)  and  tolerance 
(ITOL)  arrays. 


6.   Indicates  errors  if  the  entered   speeds  <^  0 
tolerances  <  0. 

3.3.21.3  Subroutine  linkage. 

Called  by:   DOCRDS 
Calls:  None. 

3.3.21.4  Local  Variables. 


or  the  entered 


Integer: 
I 

OUT 
IN 


Iteration  variable. 

Number  of  the  outbound  direction. 

Number  of  the  inbound  direction. 


Real: 

NSPEED(4) 
NTOL  (4) 

Real*8: 

SSPACE  (4) 

TSPACE  (4) 

BLANK 


The  values  of  the  speed  fields  of  the  SPEED  card. 
The  values  of  the  tolerance  fields  of  the  SPEED  card. 


Alphanumeric  contents  of  the  speed  fields  of  the 

SPEED  card. 
Alphanumeric  contents  of  the  tolerance  fields  of  the 

SPEED  card. 
8  blanks  (X40). 
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3.3.21.5  Outside  Variables. 

Altered:  from  DOCRDS  —  SPEEDF 

from  INPUT  —  ISPEED,  ITOL 
from  MAXBAND  —  ERRCNT 
Used:   from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  DIRECT,  WARNL 


3.3.22  Subroutine  CQUEUE . 
3.3.22.  1  Purpose. 

Reads  information  from  the  QUEUE  card. 

3. 3. 22. 2  Synopsis. 

1.  Prints  a  warning  message  and  exits  if  a  QUEUE  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  QUEUE  card 
type  flag  QUEUEF. 

2.  Reads  the  queue  clearance  times  (ITAU)  for  all  four  directions 
in  fractions  of  a  cycle. 

3.  Reads  the  alphanumeric  contents  of  the  four  fields  (SPACE). 

4.  Exits  if  the  input  direction  entered  on  the  SETUP  card   is  bad. 

5.  Assigns  default  values  to  fields  which  are  blank. 

6.  There  is  an  error  if  the  main  street  queue  clearance  times  are 
not  in  the  range  >_  0  and  <_  1 . 

3.3.22.3  Subroutine  linkage. 

Called  by:   DOCRDS 
Calls:   None. 

3.3*22.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

OUT  Number  of  outbound  direction. 

IN  Number  of  inbound  direction. 

Real*8: 

SPACE(4)      Alphanumeric  contents  of  the  QUEUE  card  fields. 
BLANK        8  blanks  (X40). 
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3.3.22.5  Outside  Variables. 

Altered:   from  DOCRDS  —  QUEUEF 
from  INPUT  —  ITAU 
from  MAXBAND  —  ERRCNT 
Used:  from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  DIRECT,  WARNL 


3.3.23  Subroutine  CVOL . 
3.  3.23.  1  Purpose. 

Reads  information  from  the  VOLUME  card. 
3.  3.23.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  VOLUME  card  has  already 
been  read  for  this  intersection.  Otherwise,  sets  the  VOLUME 
card  type  flag  VOLF. 

2.  Reads  through  (TVOL)  and  left  (LVOL)  volumes  for  all  four 
directions  in  vehicles/hour. 

3.  Reads  the  alphanumeric  contents  of  the  through  (TSPACE)  and  left 
(LASPACE)  fields  of  the  VOLUME  card. 

4.  There  is  an  error  if  there  is  not,  for  at  least  one  direction  on 
both  the  main  and  cross  streets,  a  through  volume  field  which  is 
not  blank. 

5.  Sets  variables  whose  fields  are  blank  to  the  default  values. 

6.  There  are  errors  if  any  through  or  left  volumes  are  negative. 

7.  There  is  an  error  if  there  is  not,  for  at  least  one  direction  on 
both  the  main  and  cross  streets,  a  positive  through  volume. 

3.3.23.3  Subroutine  linkage. 

Called  by:     DOCRDS 
Calls:     None. 

3.3.23.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real*8: 
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TSPACE(4)     Alphanumeric  contents  of  the  through  fields  of  the 

VOLUME  card. 
LSPACEC4)     Alphanumeric  contents  of  the  left  fields  of  the 

VOLUME  cards. 
BLANK        8  blanks  (X40). 

3.3.23.5  Outside  Variables. 

Altered:   from  DOCRDS  —  VOLF 

from  INPUT  —  TVOL,  LVOL 

from  MAXBAND  —  ERRCNT 

Used:  from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 

from  INPUT  —  WARNL 


3.3.24  Subroutine  CCAP . 
3.3.24.  1  Purpose. 

Reads  information  from  the  CAPACITY  card. 
3.3.24.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  CAPACITY  card  has 
already  been  read  for  this  intersection.  Otherwise,  sets  the 
CAPACITY  card  type  flag  CAPF . 

2.  Reads  through  (TCAP)  and  left  (LCAP)  capacities  for  all  four 
directions  in  vehicles/hour. 

3.  Reads  the  alphanumeric  contents  of  the  through  (TSPACE)  and  left 
(LSPACE)  fields  of  the  CAPACITY  card. 

4.  There  is  an  error  if  there  is  not,  for  at  least  one  direction  on 
both  the  main  and  cross  streets,  a  through  capacity  field  which 
is  not  blank. 

5.  Sets  variables  whose  fields  are  blank  to  the  default  values. 

6.  There  are  errors  if  any  through  or  left  capacities  are  negative. 

7.  There  is  an  error  if  there  is  not,  for  at  least  one  direction  on 
both  the  main  and  cross  streets,  a  positive  through  capacity. 
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3.3.24.3  Subroutine  linkage. 

Called  by:     DOCRDS 
Calls:      None. 

3.3.24.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real*8: 

TSPACE(4)     Alphanumeric  contents  of  the  through  fields  of  the 

CAPACITY  card. 
LSPACE(4)     Alphanumeric  contents  of  the  left  fields  of  the 

CAPACITY  cards. 
BLANK        8  blanks  (X40). 

3.3.24.5  Outside  Variables. 

Altered:   from  DOCRDS  —  CAPF 

from  INPUT  —  TCAP,  LCAP 
from  MAXBAND  —  ERRCNT 
Used:   from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  WARNL 


3.3.25  Subroutine  CMING . 
3.3.25.  1  Purpose. 

Reads  information  from  the  MINGREEN  card. 
3. 3.25.2  Synopsis. 


1.  Prints  a  warning  message  and  exits  if  a  MINGREEN  card  has 
already  been  read  for  this  intersection.  Otherwise,  sets  the 
MINGREEN  card  type  flag  MINGF. 

2.  Reads  through  (TMING)  and  left  (LMING)  minimum  green  times  for 
all  four  directions  in  vehicles/hour. 

3.  Reads  the  alphanumeric  contents  of  the  through  (TSPACE)  and  left 
(LSPACE)  fields  of  the  MINGREEN  card. 

4.  Sets  variables  whose  fields  are  blank  to  the  default  values. 

5.  There  are  errors  if  any  through  or  left  minimum  green  times  are 
negative. 
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6.  There  is  an  error  if  the  sum  of  the  minimum  green  times  for  the 
main  and  cross  street  phases  exceeds  1,  according  to  MAXBAND's 
split  model. 

3.3.25.3  Subroutine  linkage. 

Called  by:   DOCRDS 
Calls:  None. 

3.3.25.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

Real: 

Calculated   according   to   MAXBAND's  split  model: 

PHASE1  The  minimum   length     in     cycles     of     the     main     street 

phase. 
PHASE2  The  minimum   length  in     cycles     of     the     cross     street 

phase. 

Real*8: 

TSPACE(4)     Alphanumeric  contents  of  the  through  fields  of  the 

MINGREEN  card. 
LSPACE(4)     Alphanumeric  contents  of  the  left  fields  of  the 

MINGREEN  cards. 
BLANK        8  blanks  (X40). 

3.3.25.5  Outside  Variables. 

Altered:   from  DOCRDS  —  MINGF 

from  INPUT  —  TMING,  LMING 
from  MAXBAND  —  ERRCNT 
Used:   from  RART  —  SEQ 

from  IDATA  (passed  as  a  value  to  RART)  or  RLOOP  —  ART 
from  INPUT  —  WARNL 


3. 4  Modifying  Input  Data  and  Computing  Additional  Values. 

After  the  input  cards  have  been  read  in,  the  data  is  checked  further 

and  translated   into  the  form  used  by  the  matrix  generator.  Splits, 

bandwidth  ratios  and  objective  function  weights  are  computed  from  the  data 
at  this  point. 


3.4.1   Card  Image  Variables  vs.   MAXBAND  matrix  generator  variables. 

MAXBAND  allows  the  user  to  analyze  only  part  of  each  artery  entered. 
COMPTE  transfers  the  values  for  these  intersections  from  the  IDATA  card 
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image  variables  to  the  MAXBAND  variables  used  in  the  matrix  generator. 
Hence  many  of  the  subroutines  called  by  COMPTE  iterate  over  only  the 
intersections  to  be  analyzed,  as  they  extract  values  from  the  card  image 
variables.  In  these  subroutines,  the  variable  OUTI  denotes  the  order 
number  of  a  intersection  being  analyzed,  starting  at  1  for  the  first  such 
intersection.  The  variable  I  denotes  the  order  number  of  the  same 
intersection  among  all  the  intersections  entered,  starting  at  1  for  the 
first  signal   entered. 


3.4.2     How  MAXBAND  Derives  Splits. 

The  subroutines  STSPLT,  CKSPLT  and  CKCORE  of  this  submodule  are 
concerned  with  deriving  the  splits  to  be  used  in  the  problem  formulation. 
The  three  subroutines  correspond  with  steps  1,  2  and  3  of  figure  61  of  the 
MAXBAND  User's  Manual.  For  a  further  explanation  of  how  the  split 
derivation  process  works,  see  the  'How  MAXBAND  Derives  Splits'  section  of 
the  User's  Manual. 


3.4.3     Subroutine  COMPTE. 

3.  4.  3.  1   Purpose. 

Controls  the  translation  of  data  from  the  card  image  variables  of 
submodule  IDATA  to  the  MAXBAND  variables  used  in  the  matrix  generator 
(MATGEN).  Also  controls  computation  of  additional  MAXBAND  variable  values 
which  are  used  in  MATGEN. 

3.  4.  3.2  Synopsis. 

For  each  artery  ART, 

1.  SETN  establishes  the  number  of  intersections  to  be  analyzed. 

2.  SETKC  computes,  if  requested,  the  target  bandwidth  ratio 
(K(ART))  and  the  objective  function  coefficients  (CO, ART)  and 
C(2,ART)). 

3.  For  each  intersection  for  which  both  a  VOLUME  and  CAPACITY  card 
has  been  entered,  CKVOL  checks  that  volumes  do  not  exceed 
capacities. 

4.  STSPLT  obtains  preliminary  splits  either  from  the  SPECIFY  card, 
or  by  computing  them  from  volume  and  capacity  information. 

5.  CKSPLT  modifies  the  splits  from  step  4  so  that  they  satisfy 
minimum  green  time  values. 

6.  CKCORE  modifies  the  splits  from  step  5  so  that  they  conform  to 
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MAXBAND's  split  model  (the  cross  street  core  time  is  preserved). 

7.  SETLEF  encodes  the  user's  choice  of  left  turn  patterns. 

8.  SETTAU  transfers  the  queue  clearance  times  to  the   matrix 
generator  variables. 

9.  SETDST  sets  up  the  link  length  variables. 

10.  SETSPD  sets  up  the  speed  variables. 

11.  SETINF  transfers  the  remaining  values  to   the  matrix  generator 
variables. 

If  steps  1  or  3  result  in  errors,  the  remaining  steps  are  skipped. 

In  addition,  COMPTE  performs  the  following  in  a  loop  problem: 


12.  SETKS  computes,  if  requested,  the  cross  artery  target  bandwidth 
ratios  K(4)  -  K(6). 

13.  SETINT  copies  the  loop  geometry  information  to  the  matrix 
generator  variables,  and  makes  further  checks  on  it.  If  errors 
are  detected,  step  14  is  skipped. 

14.  CHKINT  checks  that  splits  for  intersections  at  artery  meetings 
do  not  exceed  1  cycle. 

3.4.3.3  Subroutine  linkage. 

Called  by:  MAXBAND 

Calls:   SETN,  SETKC,  CKVOL,  STSPLT,  CKSPLT,  CKCORE,  SETLEF,  SETTAU, 
SETDST,  SETSPD,  SETKS,  SETINT,  CHKINT 

3.4.3.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit  —  number  of  arteries  in  problem. 
ART  Number  of  current  artery. 

3.4.3.5  Outside  Variables. 

Altered:  None. 

Used:      from   INPUT   —  FIRST,    LAST,    ISEQ,    DIRECT,    WARNL,      TVOL,      LVOL, 

VOLFC,  LPAT,  G,  IL,  SPECFC,  TCAP,  LCAP, 
CAPFC,  TMING,  LMING,  MINGFC,  ITAU,  LENGTH, 
ISPEED,  ITOL,  CHG,  IINTER,  INODNO,  ISEQNO, 
IINAME,  KFLAG,  CFLAG 
from  MAXBAND  —  N,  K,  C,  LEFT,  R,  RBAR,  L,  LBAR,  TAU,  TAUBAR, 
D,  DBAR,  E,  EBAR,  F,  FBAR,  IG,  IGBAR,  IH, 
IHBAR,       INTER,    ERRCNT,    LOOP,    METRIC,    NODENO, 
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SEQNO,  INAME 

3.4.4  Subroutine  SETN . 

3.4.4.1  Purpose. 

Determines  the  number  of  intersections  (N)  to  be  used  in  the  analysis. 

3.4.4.2  Synopsis. 


1.  There  is  an  error  if  the  range  N(ART),  ...  ,  minimum 
(LAST (ART),  ISEQ(ART))  does  not  include  at  least  two 
intersections. 

2.  The  last  intersection  to  be  analyzed  (MINLST)  is  set  to  minimum 
(LAST (ART),  ISEQ(ART)).  A  warning  message  is  printed  if 
LAST(ART)  specifies  a  further  intersection  than  ISEQ(ART),  the 
last  intersection  actually  entered. 

3.  N(ART)  is  computed  from  FIRST (ART),  LAST (ART)  and  ISEQ(ART)  as 
minimum  (LAST  (ART),  ISEQ(ART))  -  FIRST  (ART)  +  1. 

3.4.4.3  Subroutine  linkage. 

Called  by:   COMPTE 
Calls:  None. 

3.4.4.4  Local  Variables. 

Integer: 

MINLST       The  minimum  of  LAST(ART)  and  ISEQ(ART)  —  the  highest 
intersection  number  to  be  used  in  the  analysis. 

3.4.4.5  Outside  Variables. 

Altered:   from  MAXBAND  —  N,  ERRCNT 
Used:   from  COMPTE  —  ART 

from  INPUT  —  FIRST,  LAST,  ISEQ,  WARNL 


3.4.5  Subroutine  SETKC . 


3.  4.  5.  1  Purpose. 


Computes  the  target  bandwidth  ratio  (K(ART))  and  the  objective  function 
weights  (C(1,ART)  and  C(2,ART))  if  these  are  to  be  computed  from  volume 
data. 
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3. 4.5.2  Synopsis. 


1.  The  flags  indicating  whether  K(ART),  C(1,ART)  and  C(2,ART)  have 
been  computed  from  volume  data  (KFLAG(ART),  CFLAG(1,ART)  and 
CFLAGC2, ART))    are   set  to  0,    indicating   no  computation. 

2.  If  none  of  K(ART),  CO, ART)  or  C(2,ART)  is  to  be  computed,  SETKC 
exits. 

3.  OUT  and  IN  are  set  to  the  numbers  representing  the  outbound  and 
inbound  directions. 

4.  The  DO  100  loop  sums  the  traffic  volumes  in  the  outbound  and 
inbound  directions  in  T0V0L  and  TIVOL.  If  a  VOLUME  card  has 
been  omitted  for  some  intersection,  an  error  is  indicated  and 
SETKC   exits. 

5.  If  there  is  no  volume  on  the  artery,  a  warning  message  is 
printed,  and  any  of  K,  C(1  )  and  C(2)  which  was  to  be  computed  is 
set  to  its  default  value.  This  condition  can  never  occur  if  the 
program   is  executing  properly. 

6.  Average  link  volumes,  A0V0L  and  AIVOL,  are  computed  for  the  two 
directions. 

7.  If  K(ART)  is  to  be  computed,  it  is  set  to  AIVOL  /  A0V0L.  If,  as 
may  happen  on  a  one-way  street,  A0V0L  is  0,  then  K(ART)  is  set 
to  0.      The  target  bandwidth  ratio  equation  will  then  be 

B(2)    >  KB(1  ) 
or 

B(2)    >  0, 

so  the  inbound  bandwidth  will  not  be  constrained  by  the  outbound 
bandwidth  as  the  result  of  this  equation.  The  K(ART) 
computation  flag,  KFLAG(ART),  is  set  to  1. 

8.  If  C(1, ART)  is  to  be  computed,  it  is  set  to 

2  *  AOVOL  /  (AOVOL  +  AIVOL) 


and  CFLAG(1,ART)  is  set  to  1. 
9.   If  C(2,ART)  is  to  be  computed,  it  is  set  to 

2  *  AIVOL  /  (AOVOL  +  AIVOL) 

and  CFLAG(2,ART)  is  set  to  1. 
The  factor  of  2  in  steps  8  and  9  is  to  insure  that  CO  .ART)  and 
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C(2,ART)  are  set  to  1  if  AOVOL  =  AIVOL. 

3.^.5.3  Subroutine  linkage. 

Called  by:   COMPTE 
Calls:   None. 

3.4.5.4  Local  Variables. 


Integer: 
OUT 

IN 
BAD 

LLIM 
ULIM 
I 

Real: 

TOVOL 
TIVOL 
AOVOL 
AIVOL 


Number  of  the  outbound  direction  — 

(1,2,3  or  4  for  N.S.E  or  W)  . 
Number  of  the  inbound  direction. 
Set  to  1  if  a  intersection  to  be  analyzed  is  missing 

a  volume  card. 
Iteration  limit  —  first  intersection  to  be  analyzed. 
Iteration  limit  —  last  intersection  to  be  analyzed. 
Iteration  variable 


Total  outbound  volume. 
Total  inbound  volume. 
Average  outbound  link  volume. 
Average  inbound  link  volume. 


3.4.5.5  Outside  Variables. 

Altered:   from  INPUT  —  KFLAG,  CFLAG 

from  MAXBAND  —  K,  C,  ERRCNT 
Used:   from  COMPTE  —  ART 

from  INPUT  —  FIRST,  TVOL,  VOLFC,  DIRECT,  WARNL 
from  MAXBAND  —  N 


3.4.6  Subroutine  CKVOL . 
3.  4.  6.  1  Purpose. 

Checks  that  volume  on  links  do  not  exceed  capacities. 
3. 4. 6. 2  Synopsis. 

For  each  intersection  in  the  current  artery: 


1.  If  only  one  or  neither  of  the  VOLUME  and  CAPACITY  cards  was 
entered,  CKVOL  goes  on  to  the  next  intersection. 

2.  If  any  through  volume  exceeds  a  through  capacity,  or  any  left 
volume  exceeds  the  corresponding  left  capacity,  CKVOL  indicates 
an  error. 
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3.4.6.3  Subroutine  linkage. 

Called   by:      COMPTE 
Calls:     None. 

3.4.6.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit  —  number  of  intersections  in  artery. 

SEQ  Number  of  current  intersection. 

BADT         Set  to  1   if   a   through   volume   exceeds   the 

corresponding  capacity. 
BADL         Set  to  1  if  a  left  volume  exceeds  the  corresponding 

capacity. 
I  Iteration  variable. 

3.4.6.5  Outside  Variables. 

Altered:   from  MAXBAND  —  ERRCNT 
Used:  from  COMPTE  —  ART 

from  INPUT  —  TVOL,  LVOL,  TCAP,  LCAP,  VOLFC,  CAPFC,  ISEQ 
from  MAXBAND  —  ERRCNT 


3.4.7  Subroutine  STSPLT . 

3.  4.  7.  1  Purpose. 

Obtains  preliminary  splits     from     given     values     or     from     computation. 
STSPLT  corresponds  to   step   1    of  figure   61  of  the  MAXBAND  User's  Manual. 

3.4.7.2  Synopsis. 

STSPLT  comprises  the  first  stage  of  the  split  derivation  process 
discussed  above. 

For  each  intersection  to  be  analyzed: 


1.  If  a  SPECIFY  card  has  been  entered,  STSPLT  copies  the  splits 
into  the  MAXBAND  variables  R,  RBAR,  L,  LBAR  and  goes  on  to  the 
next  intersection. 

2.  If  splits  are  to  be  computed,  but  both  a  volume  and  CAPACITY 
card  have  not  been  entered,  STSPLT  indicates  an  error  and  goes 
on  to  the  next  intersection. 

3.  Through  (TRAT)  and  left  (LRAT)  ratios  of  volume  to  capacity  are 
computed  for  all  four  directions  of  the  intersection.  If  any 
capacity  is  0,  the  corresponding  ratio  is  set  to  0. 
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Using  the  cycle  division  shown  in  the  modified  split  model  of 
figure  63  of  the  MAXBAND  User's  Manual,  MAIN  is  set  to  the 
larger  of 

TRAT(OUT)   +  LRAT(IN)      and      TRAT(IN)   +  LRAT(OUT), 

and  CROSS  to  the  larger  of 

TRAT(INDEX)   +  LRAT(INDXPI) 
and 

TRATQNDXP1)   +  LRAT(INDEX). 

The  cross  street  core  time,    RCORE,    is  set  to 

CROSS  /    (MAIN   +  CROSS) 


in  accordance  with  Webster's  theory  for  cycle  division.  Earlier 
checks  on  the  volume  and  capacity  data  prevent  MAIN  +  CROSS  from 
being  0. 

6.  The  main  street  phase  of  the  cycle,  1  -  RCORE,  is  then  divided 
among  the  four  main  street  splits,  according  to  the  modified 
split  model,   using   the  ratios  TRAT  and   LRAT. 

On  a  one  way  street,  it  is  possible  that  both  TRAT  in  one  direction 
and  LRAT  in  the  opposite  direction  will  be  0.  In  this  case,  the 
first  direction  will  receive  a  red  split  of  100  per  cent,  while 
the  opposite  direction  receives  a  left  split  of  0  per  cent. 

3.4.7.3  Subroutine  linkage. 


Called  by: 
Calls: 


COMPTE 
None. 


3.4.7.4  Local  Variables. 


Integer: 
OUT 

IN 

LLIM 

ULIM 

I 

OUT  I 

INDEX 

INDXP1 


Number  of  the  outbound  direction  — 

1-N,  2-S,  3-E,  4-W. 
Number  of  the  inbound  direction. 

Iteration  limit  —  first  intersection  to  be  analyzed. 
Iteration  limit  —  last  intersection  to  be  analyzed. 
Number  of  current  intersection  as  entered. 
Number  of  current  intersection  in  analysis. 
Number  of  one  of  the  cross  street  directions. 
INDEX  +  1  —  number  of  the  other   cross   street 

direction. 


Real: 

MAIN 

CROSS 

RCORE 


The  largest  ratio  sum  on  the  main  street. 
The  largest  ratio  sum  on  the  cross  street, 
The  cross  street  core  time. 
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3.4.7.5  Outside  Variables. 

Altered:   from  MAXBAND  —  R,  RBAR,  L,  LBAR,  ERRCNT 
Used:   from  COMPTE  —  ART 

from  INPUT  —  G,  IL,  TVOL,  LVOL,  TCAP,  LCAP,   DIRECT,   FIRST, 

SPECFC,  VOLFC,  CAPFC 
from  MAXBAND  —  N 


3.4.8  Subroutine  CKSPLT . 

3.4.8.  1  Purpose. 

Modifies  the  preliminary  splits  produced  by  STSPLT  so  that  they  satisfy 
minimum  green  times.  CKSPLT  corresponds  to  step  2  of  figure  61  of  the 
MAXBAND  User's  Manual. 

3.4.8.2  Synopsis. 


1.  If  a  MINGREEN  card  is  present,  the  values  on  it  are  used  to 
modify  the  splits  regardless  of  whether  they  were  taken  from  a 
SPECIFY  card   or  computed   from  volume  and     capacity     information. 

2.  If  the  MINGREEN  card  is  not  present  and  the  SPECIFY  card  is 
present,  the  splits  taken  from  the  SPECIFY  card  are  not 
modified . 

3.  If  neither  the  MINGREEN  card  nor  the  SPECIFY  card  is  present, 
the  computed  splits  are  modified  to  conform  with  default 
minim  urns. 

Step  3  consists  of 


1.  Setting   R  or   RBAR  to  0.95   if  it  is     larger     than     0.95     and     the 
corresponding  through  capacity  is  >   0. 

2.  Setting   L  or   LBAR  to  0.05   if  it   is  smaller     than     0.05     and     the 
corresponding   capacity  is  >   0. 

This     corresponds     to     minimums     of     0.05   cycles  for  both  through  and   left 
splits   in  both  directions. 

Step   1   above  consists  of  the  following: 


1.      LNEW,    LBRNEW,    GNEW  and   GBRNEW  are   set     to      the     maximum      of     the 
corresponding   preliminary  split  and    its  minimum. 
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2.  Applying  the  cross  street  minimums  to  MAXBAND's  split  model, 
MCORE  is  set  to  the  minimum  portion  of  the  cycle  to  be  allocated 
to  the  cross  street. 

3.  The  revised  outbound  through  split,  GNEW,  and  inbound  left 
split,  LBRNEW,  and  added  to  MCORE.  If  the  sum  is  less  than  1, 
GNEW  and  LBRNEW  can  be  used  as  the  new  values  of  G  and  LBAR,  so 
CKSPLT  skips  to   step  6. 

4.  If  the  sum  is  greater  than  1,  the  main  street  splits  will  have 
to  be  made  smaller.  CKSPLT  first  compresses  them  uniformly,  by 
setting 

GNEW    =    (1    -R)    /((1    -R)   +  LBAR)        *      (1    -  MCORE) 
and 

LBRNEW    =    (1    -  RBAR)    /   ((1    -  RBAR)  +  L)      *      (1    -  MCORE) 


5.  If  the  new  value  of  GNEW  is  less  than  the  minimum  outbound 
through  split,  TMING(OUT),  R  is  given  1  -  this  value,  and  LBAR 
is  set  to   the  remaining   portion  of  the  main  street  phase. 

Otherwise,  LBRNEW  is  checked  against  the  value  LBRMIN.  If  it 
is  less  than  LBRMIN,  LBAR  is  set  to  LBRMIN,  and  R  is  set  to  1  - 
the  remaining   portion  of  the  main   street  phase   (MCORE   +  LBRMIN). 

LBRMIN  is  used  to  prevent  the  left  split  from  becoming  too 
small.      It   is  set  to 

a)  0.05  if  the  preliminary  value  of  LBAR  was  at  least 
this  much,  and  at  least  this  much  of  the  cycle  is  left 
after  the  cross  street  and  outbound  through  minimums 
are  satisfied. 

b)  the  preliminary  value  of  LBAR,  if  this  value  is  less 
than  0.05,  and  at  least  this  much  of  the  cycle  is  left 
after  the  cross  street  and  outbound  through  minimums 
are  satisfied. 

c)  the  amount  of  the  cycle  which  is  left  after  the  cross 
street  and  outbound  through  minimums  are  satisfied,  if 
this  amount  is  smaller  than  the  preliminary  value  of 
LBAR   and   0.05. 

Finally,  if  GNEW  2TMING(0UT)  and  LBRNEW  >  LBRMIN,  R  is  set 
to   1    -  GNEW  and   LBAR   to   LBRNEW. 

6.  Steps  2  through  5  are  repeated  for  the  inbound  direction,  using 
GBRNEW,  LNEW,  TMING(IN)  and  LMIN  instead  of  GNEW,  LBRNEW, 
TMING(OUT)    and    LBRMIN. 

Note  that  because  it  is  required  when  the  MINGREEN  card   is  entered   that 
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and 


TMING(OUT)   +  LMING(IN)   +  MCORE    <   1 
TMING(IN)   +  LMING(OUT)   +  MCORE   <  1 
these  steps  will  always  lead   to   splits  wwhich  satisfy 

(1    -  R)  +  LBAR   <  1 
(1    -  RBAR)  +  L    <   1. 


and 


3.4.8.3  Subroutine  linkage. 

Called  by:   COMPTE 
Calls:  None. 

3.4.8.4  Local  Variables. 


Integer: 
OUT 

IN 

INDEX 

INDXP1 

LLIM 
ULIM 
I 
OUT  I 

Real: 

LNEW 

LB  R  NEW 

GNEW 

GBR NEW 

MCORE 

LBRMIN 

LMIN 


Number  of  outbound  direction  — 

1-N;  2-S;  3-E ;  4-W. 
Number  of  inbound  direction. 
Number  of  one  of  the  cross  street  directions. 
INDEX  +  1  —  number  of  the  other   cross   street 

direction. 

Iteration  limit  —  first  intersection  to  be  analyzed. 
Iteration  limit  —  last  intersection  to  be  analyzed. 
Number  of  current  intersection  as  entered. 
Number  of  crrent  intersection  as  analyzed. 


Modified  value  of  L. 

Modified  value  of  LBAR. 

Modified  value  of  1  -  R  (through  split). 

Modified  value  of  1  -  RBAR  (through  split). 

Minimum  cross  street  core  time. 

Minimum  value  for  LBAR. 

Minimum  value  for  L. 


3.4.8.5  Outside  Variables. 


Altered:   from  MAXBAND 
Used:  from  COMPTE  - 
from  INPUT  — 


R,    RBAR,    L,    LBAR 
ART 

TMING,       LMING,      TCAP,      LCAP,      MINGFC,      SPECFC, 
FIRST,    DIRECT 
from   MAXBAND   —  N 
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3.4.9  Subroutine  CKCORE . 

3.  4.  9.  1  Purpose. 

Adjusts  splits  so  that  they  conform  with  MAXBAND's  split  model.  CKCORE 
corresponds  to   step  3  of  figure   61  of  the  MAXBAND  User's  Manual. 

3. 4. 9.2  Synopsis. 

After  splits  have  been  obtained  and  modified  to  conform  with  minimum 
values,  it  may  be  necessary  to  increase  one  of  the  main  street  left  splits 
so   that  the  splits  conform  with  MAXBAND's  split  model. 


1.  ROUT  and  RIN  are  set  to  the  portion  of  the  red  time  in  each 
direction  which  is  not  available  to  the  main  street,  i.e., 
should  correspond   to   the  cross  street  core  time. 

2.  If  ROUT  not  =  RIN,  then  the  left  turn  split  for  one  direction 
does  not  make  full  use  of  the  part  of  the  cycle  availabe  to  it. 
Hence,  the  smaller  left  split  is  increased  by  the  amount  of  the 
absolute  value  of  the  difference  between  ROUT  and   RIN. 

Note  that  ROUT  and   RIN  are  considered   equal    if  they  differ  by 
less  than  0.0001. 

Since  ROUT  and   RIN  can  also  be  though  of  as 

ROUT   =  1    -  g(out)   -   Kin) 
and 

RIN    =  1    -  g(in)   -   Kout) 

where  g(-)   and   l(-)   are  through  and   left  splits,   and  out  and      in     are     the 
outbound   and   inbound  directions,   the  above  is  equivalent  to  requiring  that 

g(out)   +   Kin)    =   g(in)   +   Kout) 


3.4.9.3  Subroutine  linkage. 

Called  by:      COMPTE 
Calls:      None. 

3.4.9.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection  as  entered. 

LIMIT        Iteration  limit  —  number  of  intersections  to  be 
analyzed. 

Real: 

ROUT  Portion  of  outbound   red  which     is     not     available     to 

main   street. 
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RIN  Portion  of  inbound   red   which  is  not  available  to  main 

street. 

3.4.9.5  Outside  Variables. 

Altered:      from  MAXBAND  —  L.LBAR 
Used:      from   COMPTE   —  ART 

from  MAXBAND  —  R,    RBAR,    N 


3.4.10     Subroutine  SETLEF. 


3.4.10.1   Purpose. 


Converts  the  left  pattern  choices  into  the  code  used  by  the  matrix 
generator. 

3.4. 10.2  Synopsis. 


1.   LEFT  (OUTI,  ART)  is  assigned 

t(1  )*1  +  t(2)  +  t(3)*4  +  t(4)*{ 


where  t(i)  is   0  if  pattern  i  is  not  selected; 
and  1  if  pattern  i  is  selcted. 

2.  If  LEFT  (OUT  I,  ART)  is  0,  but  both  left  splits,  L(0UTI,ART)  and 
LBAR (OUTI, ART)  are  greater  than  0,  LEFT (OUTI, ART)  is  set  to  15, 
so  that  all  left  turn  patterns  will  be  considered. 

3.  If  LEFT  (OUT  I,  ART)  is  0,  but  one  of  L(OUTI.ART)  and 
LBAR (OUTI, ART)  is  greater  than  0,  then  LEFT (OUTI, ART)  is  set  to 
3,  so  that  pattterns  1  and  2  will  be  considered.  Note  that  if 
only  one  of  the  left  splits  is  greater  than  0,  the  four  patterns 
reduce  to  patterns  1  and  2. 

3.4.10.3  Subroutine  linkage. 

Called  by:     COMPTE 
Calls:      None. 

3.4.10.4  Local  Variables. 

Integer: 

PATERN  Contains  code  as  it  is  built  up. 

LLIM  Iteration  limit  —  first  intersection  to  be  analyzed 

ULIM  Iteration  limit  —  last  intersection  to  be  analyzed 

I  Number  of  current  intersection  as  entered. 

OUTI  Number  of  current  intersection  as  analyzed. 
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3.4.10.5  Outside  Variables. 

Altered:   from  MAXBAND  —  LEFT 
Used:   from  COMPTE  —  ART 

from  INPUT  —  LPAT,  FIRST 
from  MAXBAND  —  L,  LBAR,  N 


3.4.11   Subroutine  SETTAU  . 

3.  4.  1 1 .  1  Purpose. 

Copies  the  queue  clearance  times  from  the  card  image  variables  to  the 
matrix  generator  variables. 

3.4. 11.2  Synopsis. 

For  each  intersection  to  be  analyzed,  TAU  is  assigned  the  outbound 
value  for  the  intersection  in  ITAU,  and  TAUBAR  is  assigned  the  inbound 
value. 

3.4.11.3  Subroutine  linkage. 

Called   by:      COMPTE 
Calls:      None. 

3.4.11.4  Local  Variables. 

Integer: 

OUT  Number  of  the  outbound  direction  — 

1-N;  2-S;   3-E ;  4-W. 

IN  Number  of  the  inbound  direction. 

LLIM  Iteration  limit  —  first  intersection  to  be  analyzed. 

ULIM  Iteration  limit  —  last  intersection  to  be  analyzed. 

I  Number  of  current  intersection  as  entered. 

OUTI  Number  of  current  intersection  as  analyzed. 

Real: 


3.4.11.5  Outside  Variables. 

Altered:   from  MAXBAND  —  TAU,  TAUBAR 

Used:   from  COMPTE  —  ART 

from  INPUT  —  ITAU,  FIRST,  DIRECT 

from  MAXBAND  —  N 
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3.4.12  Subroutine  SETDST . 

3.4.  12.  1  Purpose. 

Trar.fers  link  lengths  from  card  image  variable  to  variables  used   in 
matrix  generator. 

3.4.  12.2  Synopsis. 

For  each  link  to  be  analyzed: 

1.  D  is  set  to  the  outbound  length  entered  on  the  LENGTH  card. 

2.  DBAR  is  set  to  D,  unless  a  positive  inbound  length  was  entered 
on  the  LENGTH  card,  in  which  case,  DBAR  is  set  to  the  latter 
value. 

3.4.12.3  Subroutine  linkage. 

Called  by:      COMPTE 
Calls:      None. 

3.4.12.4  Local  Variables. 


Integer: 
OUT 

IN 

LLIM 

ULIM 

I 

OUT  I 

IP1 


Number  of  outbound   direction  — 

1-N;      2-S;      3-E ;      4-W. 
Number  of  inbound   direction. 
Iteration  limit  —   first  link  to   be  analyzed. 
Iteration  limit  —   last  link  to  be  analyzed. 
Number  of  current   intersection  as  entered. 
Number  of  current   intersection  as  analyzed. 
1+1    —  number     of     upper      intersection     at     current 

link. 


Real: 


3.4.12.5  Outside  Variables. 

Altered:      from  MAXBAND   —  D,    DBAR 

Used:      from  COMPTE   —  ART 

from  INPUT   —  LENGTH,    FIRST,    DIRECT 

from  MAXBAND   —  N 
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3.4.13  Subroutine  SETSPD. 
3.4.  13.  1  Purpose. 


Computes  values  of  speed  related  variables  used  in 
generator. 

3. 4. 13.2  Synopsis. 


the   matrix 


CKSPD  checks  that  the  tolerances  and  changes  between  links 
entered  as  within  proper  bounds.  If  not,  an  error  is  indicated 
and  SETSPD  exits. 


CONV  is  set  to  the  proper  conversion  factor  from  miles/hour 
feet/second,  or  kilos/hour  to  meters/ second . 


to 


3.  For  each  link  to  be  analyzed,  E  and  F  are  set  to  the  lower  and 
upper  speed  limits  in  the  outbound  direction,  and  EBAR  and  FBAR 
are  set  to  the  same  values  for  the  inbound  direction,  in 
feet/second  or  meters/second. 

Note  that  the  outbound  link  i  is  the  outbound  approach  to  the 
intersection  i+1 ,  so  the  outbound  values  use  the  values  of 
ISPEED  and  ITOL  at  the  next  intersection. 

4.  For  each  pair  of  successive  links  connecting  intersections  to  be 
analyzed,  MXOSPD  is  set  to  the  maximum  outbound  speed  allowed  on 
the  two  links,  and  MXISPD  to  the  maximum  inbound  speed,  in 
miles/hour  or  kilos/hour.  As  before,  since  outbound  link  i  is 
the  outbound  approach  to  intersection  i+1 ,  MXOSPD  uses  the 
values  of  ISPEED  and  ITOL  at  the  next  two  intersections.  CHGOUT 
and  CHGIN  are  set  to  the  inverse  speeds,  in  seconds/foot  or 
seconds/meter,  which  limit  the  allowed  change  in  speed  between 
links  to  the  desired  value,  for  the  outbound  and  inbound 
directions. 

Finally,  IG  and  IGBAR  are  assigned  the  upper  limits  for  the 
inverse  speed  change,  and  IH  and  IHBAR  are  assigned  the  lower 
limits. 

3.4.13.3  Subroutine  linkage. 

Called  by:      COMPTE 
Calls:      CKSPD 

3.4.13.4  Local  Variables. 


Integer: 
OUT 

IN 
LLIM 


Number  of  the  outbound  direction  — 

1-N;  2-S;  3-E ;  4-W. 
Number  of  the  inbound  direction. 
Iteration  limit  —  number  of  first  link  to   be 
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ULIM 

I 

OUT  I 

IP1 

IP2 

BADTOL 

BADCHG 


analyzed . 
Iteration  limit  —  number  of  last  link   to   be 

analyzed . 
Number  of  current  intersection  as  entered. 
Number  of  current  intersection  as  analYzed. 
1+1. 
1+2. 

Set  to  1  in  CKSPD  if  a  tolerance  is  bad. 
Set  to  1  in  CKSPD  if  an  allowed  change  in  speed 

between  links  is  bad. 


Real: 

CONV 

MXOSPD 
MXISPD 
CHGOUT 

CHGIN 


Conversion  factor  —  mph  to  ft/sec  or   kph   to 

meters/ sec . 
Maximum  outbound  speed  allowed  on  a  pair  of  links. 
Maximum  inbound  speed  allowed  on  a  pair  of  links. 
Inverse  speed  which  allows  maximum  change  is  outbound 

speed  between  links. 
Inverse  speed  which  allows  maximum  change  in  inbound 

speed  between  links. 


3.4.13.5  Outside  Variables. 

Altered:   from  MAXBAND  —  E,  EBAR,  F,  FBAR,  IG,  IGBAR,  IH,  IHBAR 
Used:   from  COMPTE  —  ART 

from  INPUT  —  FIRST,  DIRECT,  ISPEED,  ITOL,  CHG 
from  MAXBAND  —  N,  METRIC,  ERRCNT 


3.4.14  Subroutine  CKSPD. 
3.4.  14.  1  Purpose. 

Checks  that  tolerance  and  changes  are  within  acceptable  bounds. 
3.4.  14.2  Synopsis. 

The  following  checks  are  made: 


1.  Tolerances  in  each  direction  must  be  less  than  the  design  speed 
center  in  the  same  direction  on  each  link.  If  this  is  not  true, 
BADTOL  is  set  to  1  and  a  error  message  is  printed  on  unit  6. 

2.  The  allowed  change  in  speed  in  each  direction  must  be  less  than 
the  maximum  speed  on  every  link  in  that  direction.  If  this  is 
not  true,  BADCHG  is  set  to  1  and  an  error  message  is  preinted  on 
unit  6. 

3.  BOTO  -  TOPO  is  set  to  the  maximum  range  in  outbound  speeds  on 
the  current  link,  extended  by  the  allowed  change  in  outbound 


67  - 


speed.  The  outbound  speed  on  the  next  link  must  fall  in  this 
range.  BOTI  -  TOPI  is  set  to  the  corresponding  range  for  the 
inbound  direction. 

NXTLOO  -  NXTUPO  is  set  to  the  maximum  range  of  speeds  allowed 
on  the  next  link  in  the  outbound  direction;  NXTLOI  -  NXTUPI  is 
the  corresponding  range  in  the  inbound  direction. 


There  is  an  error  if  the  range  NXTLOO  -  NXTUPO  does  not 

overlap  BOTO  -  TOPO,  or  if  NXTLOI  -  NXTUPI  does  not  overlap  BOTI 

-  TOPI.   In  this  case,  BADCHG  is  set  to  1,  and  an  error  message 
is  printed  on  unit  6. 


3.4.14.3  Subroutine  linkage. 

Called  by:  SETSPD 
Calls:   None. 

3.4.14.4  Local  Variables. 


Integer: 
I 
OUT 

IN 

LIMIT 

IP1 


Iteration  variable. 

Number  of  outbound  direction  — 

1-N;   2-S;   3-E ;   4-W. 
Number  of  inbound  direction. 
Iteration  limit. 
1+1. 


Real 


BOTO 

BOTI 

TOPO 
TOPI 
NXTLOO 

NXTLOI 
NXTUPO 
NXTUPI 


range  on  next  link   — 


range  on  next  link 


Bottom  of  allowed   speed 

outbound . 
Bottom  of  allowed   speed 

inbound . 
Top  of  allowed  speed  range  on  next  link  —  outbound 
Top  of  allowed  speed  range  on  next  link  —  inbound 
Bottom  of  actual  speed  range  on  ■  next   link 

outbound . 
Bottom  of  actual  speed  range  on  next  link  —  inbound 
Top  of  actual  speed  range  on  next  link  —  outbound 
Top  of  actual  speed  range  on  next  link  —  inbound. 


3.4.14.5  Outside  Variables. 

Altered:   from  MAXBAND  —  ERRCNT 

from  SETSPD  —  BADTOL,  BADCHG 
Used:   from  COMPTE  —  ART 

from  INPUT  —  DIRECT,  ISPEED,  ITOL,  CHG 
from  MAXBAND  —  N 
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3.4.15     Subroutine  SETINF . 

3.4.15.1  Purpose. 

Copies  remaining  artery  values  into  variables  used  by  the  matrix 
generator. 

3.4.15.2  Synopsis. 

For  the  intersections  being  analyzed, 

INODNO  is  copied    into   NODENO; 
ISEQNO  is  copied    into   SEQNO;   and 
IINAME  is  coped    into   INAME. 

3.4.15.3  Subroutine  linkage. 

Called  by:     COMPTE 
Calls:      None. 

3.4.15.4  Local  Variables. 

Integer: 

LLIM  Iteration  limit  —  first  intersection  to  be  analyzed. 

ULIM  Iteration  limit  —  last  intersection  to  be  analyzed. 

I  Number  of  current  intersection  as  entered. 

OUTI  Number  of  current  intersection  as  analyzed. 

3.4.15.5  Outside  Variables. 

Altered:   from  MAXBAND  —  NODENO,  SEQNO,  INAME 
Used:  from  COMPTE  —  ART 

from  INPUT  —  INODNO,  ISEQNO,  IINAME,  FIRST 
from  MAXBAND  —  N 


3.4.16  Subroutine  SETKS. 
3.  4. 16. 1  Purpose. 

Computes  K(4),  K(5)  or  K(6),  if  it  is  to  be  computed  from  volume  data, 
3.  4. 16.2  Synopsis. 

1.  The  computation  flags  KFLAG(4)  -  KFLAG(6)  are  set  to  0. 

2.  SETKS  exits  if  no  computation  is  necessary. 

3.  AVGVOL  is  called  to  compute  the  average  link  volumes  on  the 
required  arteries.  If  BAD  returns  with  a  value  of  1,  a 
intersection  on  an  artery  was  missing  a  VOLUME  card,  so  SETKS 
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exits. 

4.   If  any  of  K(4)  -  K(6)  is  less  than  zero,  it  is  set  to  the 
desired  ratio,  and  the  corresponding  KFLAG  is  set  to  1. 

If  a  K  is  to  be  computed,  but  the  volumes  on  the  first  artery 
to  be  compared  —  the  volumes  in  the  denominator  —  are  0,  the  K 
is  set  to  0,  and  an  error  message  is  printed  on  unit  6.  This 
should  not  happen  if  MAXBAND  is  running  properly  (the  check  is 
redundant)  . 

K(4)  compares  arteries  2  and  1;  K(5)  arteries  3  and  1;  and 
K(6)  arteries  3  and  2. 

3.4.16.3  Subroutine  linkage. 

Called  by:      COMPTE 
Calls:      AVGVOL 

3.4.16.4  Local  Variables. 

Integer: 

BAD  Set  to  1  in  AVGVOL  if  a  intersection  on  an  artery  is 

missing  a  VOLUME  card. 

Real: 

A0V0L(3)      Average  outbound  link  volumes  on  the  arteries. 
AIV0L(3)      Average  inbound  link  volumes  on  the  arteries. 

3.4.16.5  Outside  Variables. 

Altered:   from  INPUT  —  KFLAG 

from  MAXBAND  —  K 

Used:   from  INPUT  —  TVOL,  VOLFC,  FIRST,  DIRECT,  WARNL 

from  MAXBAND  —  N,  ERRCNT 


3.4.17  Subroutine  AVGVOL. 
3.4.17.1  Purpose. 

Computes  average  outbound  and  inbound  link  volumes  on  given  artery. 
3.4.  17.2  Synopsis. 


1.  For  the  approaches  to  each  intersection  to  be  analyzed,  set 
TO VOL  and  TIVOL  to  the  total  outbound  and  inbound  volume.  If 
there  is  no  volume  card  at  at  least  one  intersection,  BAD  is  set 
to  1  and  a  error  message  is  printed  on  unit  6. 
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2.      The  average  link  volumes   in  each  direction,    AOVOL  and  AIVOL,    are 
computed  by  dividing  TOVOL  and   TIVOL  by  N(ART). 

3.4.17.3  Subroutine  linkage. 

Called  by:     SETKS 
Calls:      None. 

3.4.  17.4  Local  Variables. 

Integer: 

OUT  Number  of  outbound  direction  — 

1-N;  2-S;  3-E ;   4-W. 

IN  Number  of  inbound  direction. 

LLIM  Iteration  limit  —  first  intersection  to  be  analyzed 

ULIM  Iteration  limit  —  last  intersection  to  be  analyzed 

I  Number  of  current  intersection  as  entered. 

Real: 


3.4.17.5  Outside  Variables. 

Altered:      from  SETKS   —  AOVOL,    AIVOL,    BAD 
from  MAXBAND   —  ERRCNT 
Used:      from   SETKS   —  ART 

from   INPUT   —  TVOL,    VOLFC,    FIRST,    DIRECT 
from  MAXBAND   —  N 


3.4.18  Subroutine  SETINT . 

3.4.  18.  1  Purpose. 

Tranfers  numbers  of  intersections  at  artery  meetings  to  variables  used 
by  matrix  generator,  and  checks  that  they  are  in  the  range  of 
intersections  actually  entered. 

3.4.  18.2  Synopsis. 


1.  The  values  in  IINTER,  offset  by  the  number  of  the  first 
intersection  to  be  analyzed,  are  placed  in  INTER.  The  contents 
of  INTER  are  explained  in  the  'Local  Variables'  section  of 
program  MAXBAND. 

2.  The  values  in  INTER  are  checked  to  see  that  they  are  in  the 
range  of  intersections  to  be  analyzed.  If  not,  an  error  is 
indicated . 

3.  For  each  artery,  INTER (1, ART)  and  INTER (2, ART)   are  checked  to 
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see  that  they  do  not  refer  to  the  same  intersection.   If  they 
do,  an  error  is  indicated. 

3.4.18.3  Subroutine  linkage. 

Called   by:      COMPTE 
Calls:      None. 

3.4.18.4  Local  Variables. 

•  Integer: 

ART  Number  of  current  artery. 

3.4.18.5  Outside  Variables. 

Altered:   from  MAXBAND  —  INTER,  ERRCNT 
Used:   from  INPUT  —  IINTER,  FIRST 
from  MAXBAND  —  N 


3.4.19  Subroutine  CKINT . 

3.4.19.1  Purpose. 

Checks  that  total  of  splits  given  or  calculate  for  intersections  at 
artery  meetings  does  not  exceed  one  cycle. 

3.4.  19.2  Synopsis. 

CKMAX  is  called  at  each  artery  meeting  to  check  to  total  of  the  splits. 

3.4.19.3  Subroutine  linkage. 

Called  by:     COMPTE 
Calls:      CKMAX 

3.4.19.4  Local  Variables. 

Integer: 

ART1         Number  of  first  artery  at  current  artery  meeting. 
ART2         Number  of  second  artery  at  current  artery  meeting. 

3.4.19.5  Outside  Variables. 

Altered:      None. 

Used:      from   INPUT   —  WARNL 

from  MAXBAND   —  R,    RBAR,    L,    LBAR,    INTER,    ERRCNT 
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3.4.20     Subroutine  CKMAX. 

3.4.20.1  Purpose. 

Checks  that  total  of  splits  at  given  artery  meeting  does  not  exceed 
one. 

3.4.20.2  Synopsis. 


1.  Using  MAXBAND's  split  model,  MAIN  is  set  to  the  duration  of  the 
main  street  phase,  and  CROSS  to  the  duration  of  the  cross  street 
core  time,  at  the  intersection.  The  first  artery,  ART1,  is 
assumed  to  be  the  main  street. 

2.  If  MAIN  +  CR0SS>  1,    an  error  is  indicated. 

3.  If  MAIN  +  CROSS  <  1,  there  is  all-red  time,  and  a  warning 
message  is  written  on  unit  6  with  its  duration. 

3.4.20.3  Subroutine  linkage. 

Called  by:  CKINT 
Calls:  None. 

3.4.20.4  Local  Variables. 

Integer: 

PHASE1       Signal  number  in  first  artery,  ART1. 
PHASE2       Signal  number  is  second  artery,  ART2. 

Real: 

MAIN  Length  of  main  street  phase  in  cycles. 

CROSS  Length  of  cross  street  core  time  in  cycles. 

ALLRED  Length  of  all  red  periods  in  cycles. 

3.4.20.5  Outside  Variables. 

Altered:      from  MAXBAND  —  ERRCNT 
Used:      from   CKINT  —  ART1,    ART2 
from   INPUT   —  WARNL 
from  MAXBAND   —  R,    RBAR,    L,    LBAR,    INTER 


3. 5     Writing  the  Input  Data  Summary, 
3.5.1      Subroutine  SUMARY. 
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3.5.1.1  Purpose. 

Tallies  errors  and  writes  the  input  data  summary. 

3. 5. 1. 2  Synopsis. 


1.  If  there  are  erros  in  the  input  cards,  writes  a  message  with 
tally  of  errors  and  exits. 

2.  Otherwise,  SUMARY  writes  a  successful  data  entry  message  and 
calls  SUMREP  to  print  the  input  data  summary. 

3.5.1.3  Subroutine  linkage. 

Called  by:      INPUT 
Calls:      SUMREP 

3.5.1.4  Local  Variables. 
None. 

3.5.1.5  Outside  Variables. 

Altered:   None. 

Used:   from  INPUT  —  SPEED,  TOL,  CHG,  SPECFC,  KFLAG,   CFLAG,   VOLFC, 

CAPFC,  MINGFC,  TVOL,  LVOL,  TCAP,  LCAP, 
TMING,  LMING 
from  MAXBAND  —  N,  T,  INTER,  ORIENT,  METRIC,  SEQNO,  NODENO, 
LEFT,  MAXRBB,  MAXIBB,  MAXITR,  MAXINV, 
RESTRT,  LOOP,  ERRCNT,  MESSL,  K,  C,  R,  RBAR, 
L,  LBAR,  TAU,  TAUBAR,  D,  DBAR,  E,  EBAR,  F, 
FBAR,  IG,  IGBAR,  IH,  IHBAR,  LNAME,  ANAME, 
INAME 


3.5.2  Subroutine  SUMREP. 
3.  5.2.  1  Purpose. 

Controls  printing  of  the  input  data  summary. 
3. 5.2. 2  Synopsis. 

1.  MPREP  prints  the  'MPCODE  VALUES'  section  of  output. 

2.  If  the  problem  is  a  single  artery,  SUMREP  prints  a  message 
stating  that  the  problem  is  a  single  artery  and  calls  ARTREP  to 
generate  the  rest  of  the  data  summary. 

3.  If  the  problem  is  a  loop,  SUMREP  writes  a  statement  saying  so, 
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calls  LOOPHD  to  print  the  loop  data  summary  heading,  and  prints 
the  artery  number  and  calls  ARTREP  for  each  of  the  three 
arteries. 

3.5.2.3  Subroutine  linkage. 

Called  by:  SUMARY 

Calls:   ARTREP,  LOOPHD 

3.5.2.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

3.5.2.5  Outside  Variables. 

Altered:  None. 

Used:   from  INPUT  —  SPEED,  TOL,  CHG,  SPECFC,  KFLAG,   CFLAG,   VOLFC, 

CAPFC,  MINGFC,  TVOL,  LVOL,  TCAP,  LCAP, 
TMING,  LMING 
from  MAXBAND  —  N,  T,  INTER,  ORIENT,  METRIC,  SEQNO,  NODENO, 
LEFT,  MAXRBB,  MAXIBB,  MAXITR,  MAXINV, 
RESTRT,  LOOP,  K,  C,  R,  RBAR,  L,  LBAR,  TAU, 
TAUBAR,  D,  DBAR,  E,  EBAR,  F,  FBAR,  LNAME, 
ANAME,  INAME 


3.5.3  Subroutine  MP  REP  . 
3.  5.  3.  1  Purpose. 

Prints  MPCODE  VALUES  section  of  the  input  data  summary. 
3.5.  3.2  Synopsis. 

MPREP  indicates 


1.  The  maximum  number  of  branch  and  bound   iterations  allowed 
(MAXRBB); 

2.  The  maximum  number  of  branch  and  bound  reinversions  allowed 
(MAXIBB); 

3.  The  maximum  number  of  linear   program   iterations   allowed 
(MAXITR); 

4.  The  maximum  number  of  linear  program  reinversions   allowed 
(MAXINV);   and 

5.  Whether  the  job  has  been  restarted  (RESTRT). 
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3.5.3.3  Subroutine  linkage. 

Called  by:     SUMREP 
Calls:     None. 

3.5.3.4  Local  Variables. 
None. 

3.5.3.5  Outside  Variables. 

Altered:      None. 

Used:      from  MAXBAND   —  MAXRBB,    MAXIVV,    MAXITR,    MAXINV,    RESTRT 


3.5.4     Subroutine  LOOPHD . 
3.  5.  4.  1   Purpose. 

Writes  the  loop  heading   for  the  input  data  summary. 
3.  5.  4.  2  Synopsis. 


1.  Gives  number  of  intersections  and  lower  and  upper  cycle  time 
limits. 

2.  Gives  intersection  numbers  at  artery  meetings. 

3.  Gives  target  cross-artery  bandwidth  ratios  K(4)  -  K(6).  If  any 
of  these  is  0,  the  statement  ' (not  used) '  is  printed  to  show 
that  the  corresponding  cross  artery  bandwidth  equation  will  not 
be  set  up. 

LOOPHD  also   indicates  whether  each  of  K(4)  -  K  (6 )     was     given 
or  computed   from  volume  information,   as  indicated  by  KFLAG. 

3.5.4.3  Subroutine  linkage. 

Called   by:      SUMREP 
Calls:      None. 

3.5.4.4  Local  Variables. 

Integer: 

NLOOP  Number  of  intersections  to  be  analyzed  in  loop. 

ART1  Number  of  the  first  artery  at  an  artery  meeting. 

ART2  Number  of  the  second  artery  at  an  artery  meeting. 

INTER1  Signal  number  in  ART1. 

INTER2  Signal  number  in  ART2. 

I  Iteration  varible. 
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3.5.4.5  Outside  Variables. 

Altered:   None. 

Used:  from  INPUT  —  KFLAG 

from  MAXBAND  —  LNAME,  N,  T,  INTER,  K 


3.5.5  Subroutine  ARTREP . 
3.5.5.1  Purpose. 

Prints  body  of  input  data  summary  for  one  artery. 
3.  5.5.2  Synopsis. 

1.  Sets  the  line  number  (LINE)  to  the  correct  value,  according  to 
the  type  of  problem. 

2.  Calls  ISTDIR  to  place  names  of  outbound  and  inbound  directions 
in  OUT  and  IN. 

3.  Calls  ISTUNT  to  place  the  proper  speed  conversion  factor  in  CONV 
and  unit  names  in  UNITS,  UNIT1  and  UNIT2. 

4.  Gives  the  name  of  the  artery  (ANAME),  the  number  of 
intersections  (N))  and  the  lower  and  upper  cycle  time  limits 
(T). 

5.  Gives  direction  from  which  intersections  are  entered  (IN)  and 
the  type  of  units  used. 

6.  Gives  the  values  of  the  target  bandwidth  ratio  (K.ART)  and  the 
objective  function  weights  (CO  .ART)  and  C(2,ART)),  and 
indicates  whether  these  values  were  given  or  computed  by 
printing  KFLAG(ART),  CFLAG(1,ART)  and  CFLAG(2,  ART) . 

7.  Writes  the  ARTERY  WIDE  VALUES  section,  which  contains  the  artery 
wide  defaults  for  the  outbound  and  inbound  speeds  (SPEED)  and 
tolerances  (TOL),  and  the  allowed  changes  in  speed  between  links 
(CHG). 

8.  INTVAL  prints  the  INTERSECTION  VALUES  section. 

9.  MNGINF  prints  the  MINIMUM  GREEN  TIMES  FACING  APPROACHES  section. 

10.  LNKVAL  prints  the  LINK  VALUES  section. 

11.  VOLINF  prints  the  VOLUMES  ON  APPROACHES  section. 

12.  CAPINF  prints  the  CAPACITIES  ON  APPROACHES  section. 
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3.5.5.3  Subroutine  linkage. 

Called   by:      SUMREP 

Calls:      ISTDIR,    ISTUNT,    INTVAL,    MNGINF,    LNKVAL,    VOLINF,    CAPINF 

3.5.5.4  Local  Variables. 


Integer: 
LINE 
I 
CONV 


Real*8: 
OUT 
IN 

UNITS 
UNIT1 
UNIT2C2) 


Number  of  current  line  from  the  top  of  the  page. 
Iteration  variable. 
Conversion  factor  — 
either  feet/ second  to  miles/hour 
or  meters/ second  to  kilos/hour. 


Name  of  outbound  direction. 

Name  of  inbound  direction. 

Name  of  units  --  'ENGLISH'  or  'METRIC. 

Contains  '  (FEET)  '  or  '(METERS)'. 

Contains  ' (MILES/ HOUR) '  OR  '(KILOS/HOUR)' 


3.5.5.5  Outside  Variables. 

Altered:   None. 

Used:   from  SUMREP  —  ART 

from  INPUT  —  SPEED,  TOL,  CHG,  SPECFC,  KFLAG,  CFLAG,  VOLFC, 
CAPFC,  MINGFC,  TVOL,  LVOL,  TCAP,  LCAP, 
TMING,  LMING 
from  MAXBAND  —  N,  T,  ORIENT,  METRIC,  SEQNO,  NODENO,  LEFT,  K, 
C,  R,  RBAR,  L,  LBAR,  TAU,  TAUBAR,  D,  DBAR, 
E,  EBAR,  F,  FBAR,  ANAME,  INAME,  LOOP 


3.5.6  Subroutine  INTVAL. 
3.  5.  6.  1  Purpose. 

Prints  INTERSECTION  VALUES  section  of  the  input  data  summary. 
3. 5. 6.2  Synopsis. 

1.  Starts  a  new  page  is  thre  is  not  enough  room  on  the  page  for  the 
section. 

2.  Writes  heading. 

3.  For  each  intersection  I  writes: 

a)  the  intersection  (signal)  number  (I); 

b)  the  node  number  (NODENO (-1,  ART)) ; 
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the  sequence  number  (SEQNOCI,  ART)) ; 

the  choice  of  left  turn  patterns  (OLEFT).   OLEFT  is 
set  by  the  subroutine  TRANS. 

the  name  of  the  cross  street  (INAME); 

whether  splits  were  given  or  computed  —  computed  as 
1  -  SPECFC(I.ART); 

the  outbound  green  split computed  as  1  -  R(I,ART); 

the  outbound  left  split  (L(I,ART)); 

the  outbound  red  split  (R(I,ART)); 

the  outbound  queue  clearance  time  (TAU(I, ART)) ; 

split    —    computed 


the  inbound    green 
1  -  RBAR(I.ART); 


as 


the  inbound  left  split  (LBAR(I, ART)) ; 

the  inbound  red  split  (RBAR(I, ART)) ; 

the  inbound  queue  clearance  time  (TAUBAR(I, ART)); 

4.  Writes  a  footing,  including  a  description  of  the  four  left  turn 
patterns. 

3.5.6.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:   TRANS 

3.5.6.4  Local  Variables. 


Integer: 
LIMIT 

I 
OSPEC 


Iteration  limit  —  number  of  intersections  being 

analyzed  in  artery. 
Iteration  variable  —  number  of  current  intersection. 
1  -  SPEC(I.ART)  —  0  -  splits  given; 

1  -  splits  computed. 


Real 


GP 
GBARP 


Outbound  green  split  —  1  -  R(I,ART). 
Inbound  green  split  —  1  -  RBAR(I.ART). 
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3.5.6.5  Outside  Variables. 

Altered:  from  ARTREP  —  LINE 
Used:  from  ARTREP  —  OUT,  IN 
from  SUMREP  —  ART 
from  INPUT  —  SPECFC 

from  MAXBAND  —  N,  NODENO,  SEQNO,  LEFT,   R,   RBAR,   L,   LBAR, 
TAU,  TAUBAR,  INAME 


3.5.7  Subroutine  TRANS. 

3.5.7.1  Purpose. 

Converts  the  choice  of  left  turn  patterns  coded   in  LEFT  to  the  O's     and 
1'sof  OLEFT. 


3.5.7.2  Synopsis. 


1.  Zeros  out   OLEFT. 

2.  Converts  the  choice  of  left  turn  patterns  coded  in  LEFT  ot  O's 
and  1 's  in  OLEFT,  where  OLEFT(i)  is  0  if  pattern  i  is  not 
selected,  and  1  if  it  is. 

3.5.7.3  Subroutine  linkage. 

Called  by:      INTVAL 
Calls:      None. 

3.5.7.4  Local  Variables. 

Integer: 

J  Iteration  variable. 

TLEFT        Work  variable  —  contains  the  left  turn  pattern  code 
as  it  is  broken  down. 

3.5.7.5  Outside  Variables. 

Altered:   from  INTVAL  —  OLEFT 
Used:  from  INTVAL  —  I 

from  SUMREP  —  ART 
from  MAXBAND  —  LEFT 
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3.5.8  Subroutine  MNGINF . 

3.5.8.1  Purpose. 

Prints  the  MINIMUM  GREEN  TIMES  FACING  APPROACHES     section     —     contains 
values  on  any  MINGREEN  cards  entered. 

3.  5.  8.2  Synopsis. 


.1.   MNGINF  sets  MINGFT  to  the  total  number  of  MINGREEN  cards  which 
were  read  for  this  artery. 

2.  If  MINGFT  >  0,  MNGINF  skips  to  a  new  page  if  necessary,  writes  a 
heading  and  lists  the  values  on  each  MINGREEN  card. 

3.  If  MINGFT  =  0,  MNGINF  skips  to  a  new  page  if  necessary,  and 
writes  the  message 

NO  MINIMUM  GREEN  TIMES  GIVEN. 


3.5.8.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:  None. 

3.5.8.4  Local  Variables. 

Integer: 

MINGFT       Total  number  of  MINGREEN  cards  entered   for   the 

artery. 
LIMIT        Iteration  limit  —  number  of  intersections  in  artery. 
I  Iteraton  variable  —  number  of  current  intersection. 

J  Iteration  variable  —  number  of  current  direction. 

3.5.8.5  Outside  Variables. 

Altered:      from  ARTREP  —  LINE 
Used:      from  SUMREP  —  ART 

from   INPUT   —  MINGFC,    TMING,    LMING 
from  MAXBAND  —  N 


3.5.9     Subroutine  LNKVAL . 
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3.5.9.1  Purpose. 

Prints  the  LINK  VALUES  section  —  the  link  lengths,   speeds  and 
tolerances. 

3.  5.  9.2  Synopsis. 

1.  LNKVAL  skips  to  a  new  page  is  necessary. 

2.  Writes  heading. 

3.  For  each  link,  writes  the  outbound  design  speed  center  (SPEED1), 
and  tolerance  (TOLD,  and  the  inbound  design  speed  center 
(SPEED2),  and  tolerance  (T0L2)  in  miles/hour  or  kilos/hour. 

These  values  are  computed  from  E,  F,  EBAR  and  FBAR. 

3.5.9.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:   None. 

3.5.9.4  Local  Variables. 

Integer: 

NM1  Iteration  limit  —  number  of  links  in  artery. 

I  Iteration  variable  —  number  of  current  link. 

Real: 

SPEED1       Outbound  speed  center  on  current  link  in  miles/hour 

or  kilos/hour. 
T0L1         Outbound  tolerance  on  current  link  in  mph  or  kph. 
SPEED2       Inbound  speed  center  on  current  link  in  mph  or  kph. 
T0L2         Inbound  tolerance  on  current  link  in  mph  or  kph. 

3.5.9.5  Outside  Variables. 

Altered:   from  ARTREP  —  LINE 

Used:   from  ARTREP  —  CONV,  OUT,  IN,  UNIT1,  UNIT2 
from  SUMREP  —  ART 
from  MAXBAND  —  N,  D,  DBAR,  E,  EBAR,  F,  FBAR 


3.5.10  Subroutine  VOLINF . 
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3.5. 10. 1  Purpose. 

Prints  the  VOLUMES  ON  APPROACHES  section  —   contains  the  values  on     any 
VOLUME  cards  entered. 

3. 5. 10.2  Synopsis. 


1.  VOLINF  sets  VOLFT  to  the  total  number  of  VOLUME  cards  which  were 
read  for  this  artery. 

2.  If  VOLFT  >  0,  VOLINF  skips  to  a  new  page  if  necessary,  writes  a 
heading  and  lists  the  values  on  each  VOLUME  card. 

3.  If  VOLFT  =  0,  VOLINF  skips  to  a  new  page  if  necessary,  and 
writes  the  message 

NO  VOLUMES  GIVEN. 


3.5.10.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:  None. 

3.5.10.4  Local  Variables. 

Integer: 

VOLFT  Total  number  of  VOLUME  cards  entered  for  the  artery, 

LIMIT  Iteration  limit  —  number  of  intersections  in  artery, 

I  Iteraton  variable  —  number  of  current  intersection, 

J  Iteration  variable  —  number  of  current  direction. 

3.5.10.5  Outside  Variables. 

Altered:   from  ARTREP  —  LINE 
Used:  from  SUMREP  —  ART 

from  INPUT  —  VOLFC,  TVOL,  LVOL 
from  MAXBAND  —  N 


3.5.11  Subroutine  CAPINF. 


3.  5. 1 1 .  1  Purpose. 


Prints  the  CAPACITIES  ON  APPROACHES  section  —  contains  the  values  on 
any  CAPACITY  cards  entered. 
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3.5. 11.2  Synopsis. 


1.  CAPINF  sets  CAPFT  to  the  total  number  of  CAPACITY  cards  which 
were  read  for  this  artery. 

2.  If  CAPFT  >  0,  CAPINF  skips  to  a  new  page  if  necessary,  writes  a 
heading  and  lists  the  values  on  each  CAPACITY  card. 

3.  If  CAPFT  =  0,  CAPINF  skips  to  a  new  page  if  necessary,  and 
writes  the  message 

NO  CAPACITIES  GIVEN. 


3.5.11.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:   None. 

3.5.11.4  Local  Variables. 

Integer: 

CAPFT        Total  number  of  CAPACITY  cards  entered   for   the 

artery. 
LIMIT        Iteration  limit  —  number  of  intersections  in  artery. 
I  Iteraton  variable  —  number  of  current  intersection. 

J  Iteration  variable  —  number  of  current  direction. 

3.5.11.5  Outside  Variables. 

Altered:   from  ARTREP  —  LINE 

Used:   from  SUMREP  —  ART 

from  INPUT  —  CAPFC,  TCAP,  LCAP 

from  MAXBAND  —  N 


3.5.12  Subroutine  ISTDIR. 

3.  5. 12.  1  Purpose. 

Assigns  alpha-numeric  direction  names  for  use  in  output.  This  routine 
is  the   same  as   SETDIR   in  the  OUTPUT  module. 

3. 5. 12. 2  Synopsis. 

Assign  OUT  and  IN  the  proper  pair  of  values  from  the  set  NORTH,  SOUTH, 
EAST  and  WEST,  depending  on  the  direction  of  intersection  entry  indicated 
in  ORIENT(ART). 
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3.5.12.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:  None. 

3.5.12.4  Local  Variables. 


Real*8: 
LETS 
LETN 
LETW 
LETE 
SOUTH 
NORTH 
WEST 
EAST 


The  letter  S. 

The  letter  N. 

The  letter  W. 

The  letter  E  (not  used) 

The  word  SOUTH. 

The  word  NORTH. 

The  expression  '  WEST' 

The  expression  '  EAST'. 


Note  that  WEST  and  EAST  contain  five  characters,  the  first  being  a 
blank. 

Real: 


3.5.12.5  Outside  Variables. 

Altered:  from  ARTOUT  -  OUT,  IN 
Used:   from  SUMREP  —  ART 

from  MAXBAND  —  ORIENT 


3.5.13  Subroutine  ISTUNT. 

3.5. 13.  1  Purpose. 

Assigns  alpha-numeric  names  of  units  and   a  conversion  factor     for     used 
in     the     output.      This  routine  is  the  same  as  SETUNT  in  the  OUTPUT  module. 

3. 5. 13.2  Synopsis. 

Assigns  UNITS,  UNIT1,  UNIT2  and  CONV  either  English  or  metric  unitts, 
according  to  the  value  of  METRIC(ART). 

3.5.13.3  Subroutine  linkage. 

Called  by:  ARTREP 
Calls:   None. 
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3.5.13.4  Local  Variables. 


Real*8: 
ENGL 
METR 
FEET 
METERS 
MPH 
KPH 
HOUR 


The  word  ENGLISH. 
The  word  METRIC. 


The  expression 
The  expression 
The  expression 
The  expression 
The  expression 


1  (FEET)  ' 
' (METERS)' 
' (MILES/H' 
1  (KILOS/H1 
'OUR)'. 


3.5.13.5  Outside  Variables. 

Altered:      from  ARTOUT   —  CONV,    UNITS,    UNIT1,    UNIT2 
Used:     from  SUMREP  —  ART 

from   MAXBAND   —  METRIC 
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CHAPTER    4 
THE  MATGEN  MODULE 


The  MATGEN  module  formulates  the  traffic  problem  as  a  mixed  integer 
program.  The  formulation  is  prepared  as  a  series  of  card  images  which  are 
input  to  the  MPCODE  mathematical  programming  system.  The  values  used  in 
the  formulation  are  obtained   from  the  INPUT  module. 


4.  1     Structure. 

Figure  4  illustrates  the  structure  of  the  module.  There  are  three  main 
sections:  subroutine  MATGEN,  the  overall  control  routine;  the  section 
beginning  with  MATGNA,  the  single  artery  matrix  generator;  and  the 
section  beginning  with  MATGNL,  the  loop  matrix  generator. 

Most  of  the  subroutines  in  MATGNL  perform  the  same  functions  as  those 
in  MATGNA;  however,  in  MATGNL  these  functions  are  repeated  for  each  of 
the  three  arteries.  In  addition,  MATGNL  has  some  subroutines  which  set  up 
the  unique  porions  of  the  loop  formulation.  Subroutines  in  submodule 
MATGNL  which  perform  essentially  the  same  functions  as  subroutines  in 
MATGNA  have  names  which  consist  of  L  followed  by  the  name  of  the 
corresponding  subroutine  in  MATGNA. 


4.2  Problem  Formulation. 

MATGEN  uses  the  single  artery  and  loop  formulations  shown  in  appendix 
A.  The  names  used  in  the  code  for  the  constants  in  the  formulations,  and 
the  index  numbers  of  the  decision  variables  and  constraints,  have  also 
been  discussed  there. 


4. 3  Input  and  Output. 

MATGEN  produces  a  file  of  80  byte  card  images  on  FORTRAN  file  11.  This 
file  is  used  as  input  to  MPCODE.  The  first  two  cards  in  the  file  are 
requred  by  the  version  of  MPCODE  installed  in  MAXBAND.  The  first  card 
states  that  there  will  be  one  MPCODE  run;  the  second  calls  the  branch  and 
bound  portion  of  MPCODE  (subroutine  BB) .  The  remaining  cards  in  the  file 
are  the  BB  card  1  through  LINP  card  10  are  described  by  Land  and  Powell 
[232-236;  1973]. 
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Figure   4:   The  MATGEN  module. 
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4. 4  Subroutine  and  Variable  Names. 

The  names  used  in  MATGEN  for  subroutines  and  local  variables  attempt  to 
relate  the  formulations  and  the  format  of  the  Land  and  Powell  input  cards. 

In  MATGNA,  the  subroutines  BBCALL,  BBC1,  BBC2,  LINP1,  LINP2,  LINP4, 
LINP6,  LINP8,  NINES  and  MORE  write  the  cards  which  give  the  run  number  and 
call  BB,  BB  cards  1  and  2,  LINP  cards  1,2,4,6  and  8,  the  card  with  10  9's, 
and  the  MORE  card  (LINP  10).  The  correspoinding  subroutines  in  MATGNL 
have  the  same  names  preceded  by  L. 

The  LINP  cards  6  and  8  contain  information  about  every  constraint  in 
the  formulation.  LINP6  and  LINP8  call  subroutines  which  write  the  LINP 
card  6  or  8  card  images  for  specific  sets  of  constraints.  The  names  of 
these  subroutines  reflect  both  the  number  of  the  card  image  and  the  number 
of  the  constraint  set.  For  example,  WL85  is  a  subroutine  of  LINP8  which 
generates  LINP  card  8  images  for  constraint  set  5  of  the  single  artery 
formulation  shown  in  appendix  A.  The  subroutines  of  LLINP6  and  LLINP8  of 
MATGNL  are  named  in  a  similar  manner. 

In  each  subroutine  which  writes  a  card  image,  there  are  local  variables 
which  correspond  to  the  field  names  for  the  card  given  in  Land  and  Powell. 
The  subroutine  will  assign  values  to  these  local  variables  and  then  write 
them  to  create  the  card  image.  For  example,  LINP1  wrties  the  card  image 
of  LINP  card  1.  LINP1  contains  the  local  variables  M,  NV,  ISBND,  MOREPR, 
ITRMAX  and  IRMAX.  These  correspond  to  the  LINP  card  1  input  fields  M,  N, 
ISBND,  MOREPR,  ITRMAX  and  IRMAX  explained  in  Land  and  Powell.  Similarly, 
all  the  WL6 —  subroutines  contain  local  variables  I(-),  S(-)  and  B(-) 
which  correspond  to  the  I,  S(I)  and  B(I)  fields  of  LINP  card  6. 


4. 5  Overall  Control  Subroutine. 
4.5.1   Subroutine  MATGEN. 
4.  5.  1 .  1  Purpose. 

Provide  overall  control  of  the  matrix  generator. 

4. 5. 1. 2  Synopsis. 

If  the  problem  is  a  single  artery,  MATGNA  is  called;   otherwise,  MATGNL 
is  called. 

4.5.1.3  Subroutine  linkage. 

Called  by:  MAXBAND 

Calls:   MATGNA, MATGNL 
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4.5.1.4  Local  Variables. 
None. 

4.5.1.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  LOOP,  N,  INTER,  LEFT,  MAXRBB,  MAXIBB,  MAXITR, 

MAXINV,  RESTRT.K,  C,  T,  R,  RBAR,  L,  LBAR, 
TAU,  TAUBAR,  D,  DBAR,  E,  EBAR,  F,  FBAR,  IG, 
IGBAR,  IH,  IHBAR 


4. 6  Single  Artery  Matrix  Generator  Subroutines. 
4.6.1   Subroutine  MATGNA. 

4.6.1.1  Purpose. 

Controls  single  artery  problem  formulation. 

4. 6. 1 . 2  Synopsis. 

MATGNA  calls  a  series  of  subroutines  which  generate  the  problem 
formulation  on  file  11. 


1.  DLCNT  determines  how  many  left  turn  decision  variables  will  need 
to  be  set  up. 

2.  CNCNT  determines  how  many  left  turn  choice  constraints  will  need 
to  be  set  up  (set  8). 

3.  BBCALL  writes  cards  which  tell  MPCODE  there  is  one  run  and  calls 
the  branch  and  bound  routine. 

4.  BBC1  writes  BB  card  1,  which  contains  parameters  used  by  the 
branch  and  bound  routine. 

5.  BBC2  writes  BB  card  2,  which  sets  up  integer  variables  and  gives 
their  step  size. 

6.  NINES  writes  a  card  with  10  9's  in  its  first  10  columns.   This 
card  is  used  as  a  delimiter  by  MPCODE. 

7.  LINP1  writes  LINP  card  1,  which  contains  parameters  used  by  the 
linear  programming  routines  (LP). 

8.  LINP2  writes  LINP  card  2,  which  sets  up  the  objective  function. 

9.  LINP4  writes  LINP  card  4,  which  sets  upper  bound  on  decision 
variables.   The  only  decision  variables  in  the  single  artery 


-   90  - 


formulation  with  upper  bounds  are  the  left  turn  variables. 

Hence,   if  there  are  none  of  these   variables,     i.e., 

DELTAC  +  DELTBC  =  0,  then  there  are  no  bounded  variables  and 
LINP  card  4  is  not  written. 

10.  LINP6  writes  LINP  card  6,  which  contains  the  signs  (  =  ,  <_  or  >_) 
and  constant  portions  —  placed  on  the  right  hand  sides  —  of 
the  constraints. 

11.  LINP8  writes  LINP  card  8,  which  contains  the  decision  variables 
and  their  coefficients  —  placed  on  the  left  hand  sides  —  of 
each  of  the  constraints. 

12.  MORE  writes  LINP  card  10,  which  indicates  whether  there  are  more 
problem  runs  in  the  deck.  In  MAXBAND,  there  is  always  only  one 
run. 

13.  EOF  closes  the  output  file. 

4.6.1.3  Subroutine  linkage. 

Called  by:  MATGEN 

Calls:   DLCNT,  CNCNT,  BBCALL,   BBC1,   BBC2,   NINES,   LINP1,   LINP2, 
LINP4,  LINP6,  LINP8,  MORE,  EOF 

4.6.1.4  Local  Variables. 

Integer: 

DELTAC  Number  of  outbound   left  decision  variables   (DEL's)    to 

be  set  up. 
DELTBC  Number  of  inbound   left  decison     variables      (DELBAR's) 

to  be  set  up. 
CONCNT  Number  of  left  turn  choice   (set  8)    constraints  to     be 

set  up. 
NUMD  Number  of  discrete  (integer)    variables  to  be  set     up. 

4.6.1.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  N,   LEFT,   MAXRBB,   MAXIBB,   MAXITR,   MAXINV, 

RESTRT,  K,  C,  T,  R,  RBAR,  L,  LBAR,  TAU, 
TAUBAR,  D,  DBAR,  E,  EBAR,  F,  FBAR,  IG, 
IGBAR,  IH,  IHBAR 

These  variables  have  been  declared  so  that  only  the  information 
pertaining  to  artery  1  is  available  in  MATGNA. 
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4.6.2  Subroutine  DLCNT . 

4.6.2.  1  Purpose. 

Finds  the  number  of  left  turn  choice  variables  (DEL's)  and  (DELBAR's) 
required . 

4. 6.2. 2  Synopsis. 

The  left  turn  choice  variables,  DEL  and  DELBAR,  are  used  in  the  MPCODE 
formulation  only  when  the  corresponding  left  turn  splits,  L  and  LBAR,  are 
non-zero.  DETAC  and  DELTBC  are  set  to  contain  the  number  of  non-zero  L's 
and  LBAR's.  The  number  of  discrete  variables,  NUMD,  is  set  to  the  number 
of  m's,   which  is   N  -  1    plus  the  number  of  DEL's  and   DELBAR's. 

4.6.2.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.2.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

4.6.2.5  Outside  Variables. 

Altered:   from  MATGNA  —  DELTAC,  DELTBC,  NUMD 

Used:   from  MAXBAND  —  N,  L,  LBAR  (LEFT  included  but  not  used.) 


4.6.3  Subroutine  CNCNT. 
4.  6.  3.  1  Purpose. 

Finds  the  number  of  left  hand  choice  (set  8)  constraints  required. 

4. 6. 3.2  Synopsis. 

Depending  on  the  left  turn  patterns  to  be  considered  and  whether  the 
left  turn  splits  are  non-zero,  up  to  two  set  8  constraints  may  be  required 
for  each  intersection.  CONCNT  is  set  to  the  total  number  of  set  8 
constraints  required  for  the  entire  artery. 

1.  CONCNT  is  initially  set  to  0. 

2.  At  each  intersection  I,  CONCNT  is  incremented  by  0,1,   or  2, 
depending  on  the  values  of  L(I),  LBAR  (I)  and  LEFT(I). 
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4.6.3.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.3.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

4.6.3.5  Outside  Variables. 

Altered:      from  MATGNA   —  CONCNT 

Used:      from  MAXBAND  —  N,    LEFT,    L,    LBAR 


4.6.4     Subroutine  BBCALL . 

4.6.4.1  Purpose. 

Writes  first  two  MPCODE  input  cards. 

4.6.4.2  Synopsis. 

The  version  of  MPCODE  used  in  MAXBAND  requires  the  input  to  begin  with 
a  card  containing  the  run  number,  which  is  always  1  in  MAXBAND,  and  a  card 
calling  the  branch  and  bound  routine  (BB)  with  the  letters  BB. 

4.6.4.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:     None. 

4.6.4.4  Local  Variables. 
None. 

4.6.4.5  Outside  Variables. 

Altered:  None. 
Used:  None. 


4.6.5  Subroutine  BBC1 . 
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4.  6.  5.  1  Purpose. 

Writes  BB  card  1 ,  which  contains  the  general  parameters  required  by  the 
MPCODE  branch  and  bound  routine  (BB). 

4. 6. 5. 2  Synopsis. 

The  values  required  on  BB  card     q     are     placed      in     field     variables     M 
through  IREST,    and  the  card   is  written  on  file   11. 

4.6.5.3  Subroutine  linkage. 

Called   by:     MATGNA 
Calls:     None. 

4.6.5.4  Local  Variables. 
BB  card   1    fields: 


Integer: 
M 

NV 

ONUMD 
INTOBJ 
IPRBB 
ITRBBM 
IRBBM 
IREST 


Number  of  constraints. 

Number  of  variables. 

Number  of  discrete  (integer)  variables  (NUMD). 

MPCODE  parameters  which  are  0  in  MAXBAND. 

Maximum  number  of  BB  iterations  (MAXRBB)  . 
Maximum  number  of  BB  reinversions  (MAXIBB). 
Restart  indicator  (RESTRT)  — 

0  -  job  is  not  a  restart; 

1  -  job  is  a  restart. 


4.6.5.5  Outside  Variables. 

Altered:   None. 

Used:   from  MATGNA  —  DELTAC,  DELTBC,  CONCNT,  NUMD 
from  MAXBAND  —  N,  MAXRBB,  MAXIBB,  RESTART 


4.6.6  Subroutine  BBC2 . 

4.6.6.1  Purpose. 

Writes  BB  card  2,  which  declares  the  integer  variables  and  gives  their 
step  size. 

4.6.  6.2  Synopsis. 

The  discrete  (integer)  variables,  which  are  the  m's,  DEL's  and 
DELBAR's,  are  declared  as  decision  variables  4*N  +  2  to  4«N  +  1  +  NUMD, 
and  given  a  step  size  of   1. 
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4.6.6.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.6.4  Local  Variables. 

BB  card  2  fields: 

Integer: 

J(59)        Indices  of  discrete  decision  variables. 
JDISC(59)     Step  sizes  of  the  discrete  variables. 

Other  local  variables: 

Integer: 

I  Number  of  current  discrete  variable. 

4.6.6.5  Outside  Variables. 

Altered:  None. 

Used:   from  MATGNA  —  NUMD 
from  MAXBAND  —  N 


4.6.7  Subroutine  LINP1  . 

4.  6.  7.  1  Purpose. 

Writes  LINP  card   1 ,    which  contains  the  general   parameters     required     by 
MPCODE   for  a  linear   program. 

4. 6. 7.2  Synopsis. 

The  values  required   on  LINP  card   1    are  placed    in     variables     M     through 
IRMAX,    and   the  card    is  written  on   file   11. 

4.6.7.3  Subroutine  linkage. 

Called   by:     MATGNA 
Calls:      None. 

4.6.7.4  Local   Variables. 

LINP  card   1    fields: 

Integer: 

M  Number  of  constraints. 

NV  Number  of  variables. 

ISBND  Number  of  bounded  variables. 

MOREPR  An  MPCODE  output  specification  —  always   3   in 
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MAXBAND. 
ITRMAX  Maximum  number  of  LP   iterations   (MAXITR). 

IRMAX  Maximum  number  of  LP  reinversions  (MAXINV) 

4.6.7.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNA  —  DELTAC,    DELTBC,    CONCNT 
from  MAXBAND   —  N,    MAXITR,    MAXINV 


4.6.8     Subroutine  LINP2 . 

4.6.8.1  Purpose. 

Writes  LINP  card  2,    which  contains  the  objective  function. 

4. 6. 8. 2  Synopsis. 

The  indices  of  the  bandwidth  variables,  B(1  )  and  B(2),  and  their 
weights,  C(1)  and  C(2),  are  entered  into  J  and  OC,  respectively,  and  the 
card  is  written  on  file  11. 

4.6.8.3  Subroutine  linkage. 

Called   by:     MATGNA 
Calls:      None. 

4.6.8.4  Local  Variables. 

LINP  card  2  fields: 

Integer: 

J(2)  Indices  of  bandwidth  variables. 

Real: 

0C(2)  Weights  of  bandwidth  variables. 

Other  local  variables: 

Integer: 

I  Direction  —  0  -  outbound; 

1    -  inbound . 

4.6.8.5  Outside  Variables. 

Altered:      None. 

Used:      from  MAXBAND  —  C 
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4.6.9     Subroutine  LINP4 . 

4.6.9.1  Purpose. 

Writes  LINP  card  4,  which  contains  the  upper  limits  on  bounded 
variables. 

4.6.9.2  Synopsis. 

The  bounded  variables  are  the  left  turn  choice  variables,  DEL  and 
DELBAR.  They  are  given  indices  5*N  +  1  through  5*N  +  DELTAC  +  DELTBC,  and 
upper  bounds  of  1.  The  lower  bounds  are  0  by  default.  The  card  image  is 
written  on  file   11 . 

4.6.9.3  Subroutine  linkage. 

Called   by:     MATGNA 
Calls:      None. 

4.6.9.4  Local  Variables. 

LINP  card  4  fields: 

Integer: 

J (40)  Indices  of  DEL's  and   DELBAR's. 

Real: 

B0UND(40)  Upper  bounds  of  DEL's  and   DELBAR's  —   always    1. 

Other  local   variables: 

Integer: 

I  Number  of  current  variable. 

LIMIT  Iteration  limit. 

4.6.9.5  Outside  Variables. 

Altered:  None. 

Used:   from  MATGNA  —  DELTAC,  DELTBC 
from  MAXBAND  —  N 


4.6.10  Subroutine  LINP6. 


4.6.10.1  Purpose 


Writes  LINP  card  6,  which  contains  the  right  hand  sides  (constant 
portions)  and  signs  (=,  <,>)  of  the  constraints. 
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4. 6. 10. 2  Synopsis. 

1.  WL623  writes  LINP  card  6  for  the  bandwidth  equation  (2)  and   the 
cycle  time  constraints  (3). 

2.  WL64A  writes  LINP  card  6  for  the  outbound  bandwidth  in  the  green 
period  constraints  (4A). 

3.  WL64B  writes  the  card  for  the  inbound  bandwidth  in  the  green 
period  constraints  (4B) . 

4.  WL65  writes  the  card  for  the  integer  constraints  (5). 

5.  WL667  writes  the  card  for  the  speed  constraints   (6A, 6B,7A,7B) . 

6.  WL68  writes  the  card  for  the  left  turn  choice  constraints   (8). 

4.6.10.3  Subroutine  linkage. 

Called  by:  MATGNA 

Calls:  WL623,  WL64A,  WL64B,  WL65,  WL667,  WL68 

4.6.10.4  Local  Variables. 
None. 

4.6.10.5  Outside  Variables. 

Altered:      None. 

Used:      from   MAXBAND   —  N,    LEFT,    K,    T,    R,    RBAR,    L,    LBAR,    TAU.TAUBAR 


4.6.11      Subroutine  WL623. 

4.  6.  1 1 .  1    Purpose. 

Writes  LINP  card  6  for  the  bandwdith  and  cycle  time  constraints  (sets  2 
and  3). 

4. 6. 11.2  Synopsis. 


1.      The  bandwidth  constraint   (2)  is  given  index      1.        Its     sign     and 
right  hand   side  is 

=   0  if  k  =  1 

>  0  if  k  <  1 

<  0  if  k  >  1 
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2.      The  cycle  constraints  (3)   are  given  signs  and  right  hand   sides 

>   1/T(2)    and   <    1/T(1  ) 

4.6.11.3  Subroutine  linkage. 

Called  by:  LINP6 
Calls:   None. 

4.6.11.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(3)  Indices  of  constraints. 

S(3)  Signs  of  constraints  —  0   -  =;      1    -  _<;      2  -  _>• 

Real: 

B(3)  Right  hand   sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Iteration  variable. 

4.6.11.5  Outside  Variables. 

Altered:  None. 

Used:      from  MAXBAND  —  K,    T 


4.6.12     Subroutine  WL64A . 

4.6.12.1  Purpose. 

Writes  LINP  card  6  for  outbound  bandwidth  in  green  period  constraints 
(4A). 

4.6. 12.2  Synopsis. 

The  set   4A  constraints  have  indices   4  to   N  +  3.      The   Jth  constraint     is 
given  sign  and  right  hand   side 

<   1    -  R(J) 
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4.6.12.3  Subroutine  linkage. 

Called   by:      LINP6 
Calls:     None. 

4.6.12.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(20)        Indices  of  constraints. 
S(20)        Signs  of  constraints. 

Real: 

B(20)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Number  of  current  constraint. 

4.6.12.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  N,  R 


4.6.13  Subroutine  WL64B . 

4.6.  13.  1  Purpose. 

Writes  LINP  card  6  for  inbound  bandwidth  in  green  period  constraints 
(4B). 

4. 6. 13.2  Synopsis. 

The  set     4B     constraints     have     indices     N  +  4     to     2*N  +  3.        The     Jth 
constraint  is  given  sign  and   right  hand   side 

<    1    -  RBAR(J) 


4.6.13.3  Subroutine  linkage. 


Called  by:  LINP6 
Calls:  None. 
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4.6.13.4  Local  Variables. 

LINP  card  6   fields: 

Integer: 

1(20)        Indices  of  constraints. 
S(20)        Signs  of  constraints. 

Real: 

B(20)  Right  hand   sides  of  constraints. 

Other  local   variables: 

Integer: 

J  Number  of  current  constraint. 

4.6.13.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  N,  RBAR 


4.6.14  Subroutine  WL65 . 
4.6. 14.  1  Purpose. 

Writes  LINP  card  6  for  the  integer  constraints  (5). 

4.6. 14.2  Synopsis. 

There  are  N  -  1    constraints,    with  indices  2*N   +  4   through  3*N   +  2.      The 
Jth  constraint  has  sign  and   right  hand   side 

R(J+1)   -  R(J)   +  TAUBAR(J)   +  TAU(J+1  )   -   5 

5  is  subtracted  so  that  the  integer  variables  (m  ' s)   may  take  negative 
values. 

4.6.14.3  Subroutine  linkage. 

Called   by:      LINP6 
Calls:      None. 

4.6.14.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(19)        Indices  of  constraints. 
SO  9)        Signs  of  constraints. 
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Real: 

B(19)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Number  of  current  constraint. 

4.6.14.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  N,  LEFT,  R,  TAU,  TAUBAR 


4.6.15  Subroutine  WL667 . 
4.  6. 15.  1  Purpose. 

Writes  LINP  card  6  for  the  speed  constraints  (6A, 6B,7A,7B) . 

4.6. 15.2  Synopsis. 

There  are  8*N  -  12  of  these  constraints,  with  indices  3*N  +3  to 
1 1 *N  -  10.  Starting  with  constraint  3*N  +  3,  the  successive  constraints 
are  arranged  in  pairs.  The  first  constraint  of  each  pair  always  has  sign 
<_,  while  the  second  has  _>.  All  the  constraints  have  right  hand  sides  of 
0. 

The  pairs  are  derived  from  the  compound  constraints  in  the  formulation. 
For  example,   the  compound  constraint 

(D(I)/F(I))*Z  <  T(I)    <   )D(I)/E(I))*Z 

is  represented   as 

(D(I)/F(I))«Z  -  T(I)    <        and        (D  (I  )/E(I  ))*Z  -  T  (I )    >  0. 

Note:  If  N  =2,  the  iterations  limits  are  computed  differently  so  as  not 
to  generate  values  for  constraint  set  7.  However,  the  limits  are  the  same 
as  when  N  >  2. 

4.6.15.3  Subroutine  linkage. 

Called  by:  LINP6 
Calls:   None. 
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4.6.15.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(148)       Indices  of  constraints. 
S(148)       Signs  of  constraints. 

Real: 

B(148)  Right  hand   sides  of  constraints. 

Other  local   variables: 

Integer: 

J  Number  of  current  constraint  or  constraint  pair. 

4.6.15.5  Outside  Variables. 

Altered:      None. 

Used  :      from  MAXBAND  -  N 


4.6.16     Subroutine  WL68 . 

4.  6.  16. 1   Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  (8). 

4.  6.  16.2  Synopsis. 

The  additional  constraints  required  to  restrict  the  left  turn  pattern 
to  a  certain  set  are  shown  in  appendix  A.  These  constraints  (8)  are  the 
last  in  the  formulation,  and  have  numbers  1 1  *N  -  9  to  1 1  *N  -  1 0  +  CNCNT. 

Steps: 

1.  The  count  of  these  constraints,  COUNT,  is  set  to  0. 

2.  For  each  intersection  J,  the  left  turn  splits  L(J)  and  LBAR(J) 
are  examined.  If  both  splits  are  non-zero,  WL681  is  called  to 
generate  the  LINP  card  6  values  for  the  intersection  J  left  turn 
choice  constraints.  If  only  L(J)  is  non-zero,  WL682  is  called. 
If  only  LBAR(J)  is  non-zero,  WL683  is  called.  If  both  L(J)  and 
LBAR(J)  are  zero,  no  additional  constraints  are  required,  so  no 
subroutine  is  called. 

3.  If  at  least  one  constraint  has  been  set  up,  the  LINP  cards  6  are 
written. 
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4.6.16.3  Subroutine  linkage. 

Called  by:      LINP6 

Calls:     WL681,   WL682,   WL683 

4.6.16.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(40)        Indices  of  constraints. 
S(40)        Signs  of  constraints. 

Real: 

B(40)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

COUNT        Number  of  set  8  constraints  set  up  so  far. 
J  Number  of  current  intersection. 

4.6.16.5  Outside  Variables. 

Altered:   None. 

Used:   from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.6.17  Subroutine  WL681 . 


4.6.  17.  1  Purpose. 


Writes  LINP  card  6  for  the  left  turn  choice  constraints   (8)     when     both 
an  intersection's  left  turn  splits  are  non-zero. 

4.  6. 17.  2  Synopsis. 


1.  If  LEFT(J)  is  0  or  15,  all  or  no  left  choices  are  to  be 
considered.  In  these  cases,  no  additonal  constraints  should  be 
set  up.  Note  that  LEFT(J)  is  set  to  some  value  other  than  0  by 
the  INPUT  module  if  one  or  both  of  L(J)  and  LBAR  (J)  are  not 
zero. 

2.  Otherwise,  the  constraint  count  (COUNT)  is  incremented,  and  the 
new  constraint  is  given  index  1 1  *N  -  10  +  COUNT. 

3.  If  LEFT(J)  is  7,  11,  13,  14,  3,  5,  6,  9,  10,  or  LEFT(J)  is  12 
and  L(J)  not  =  LBAR  (J ) ,  only  one  additional  constraint  is 
needed.  S(COUNT)  is  set  to  the  sign  of  the  constraint,  B( COUNT) 
to  the  right  and  side,  and  WL681  exits. 
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4.  If  LEFT(J)  is  1,  2,  4,  8  or  LEFT(J)  =  12  and  L(J)  =  LBAR(J), 
then  two  constraints  are  needed.  After  the  right  hand  sides  of 
both  constraints  are  assigned  to  B( COUNT)  and  BCCNTP1),  and  the 
sign  of  the  first  constraint  (0)  is  assigned  to  S(COUNT),  COUNT 
is  incremented.  The  second  constraint  is  assigned  index 
11«N  -  10  +  COUNT  and  sign  0.   WL681  then  exits. 

4.6.17.3  Subroutine  linkage. 

Called  by:     WL68 
Calls:     None. 

4.6.17.4  Local  Variables. 

Integer: 

CNTP1        COUNT  +  1 

4.6.17.5  Outside  Variables. 

Altered:  from  WL68  —  COUNT,  I,  S,  B 
Used:  from  WL68  —  J 

from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.6.18  Subroutine  WL682 . 

4.6.18.1  Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  of 
intersection  (8)  when  only  the  outbound  left  turn  split  is  non-zero. 

4. 6. 18.2  Synopsis. 


1.  IF   LEFT(J)    is   0,    15,    7,    11,    13,    14,    3,    6,    9  or   12,    no  additional 
constraints  need  to  be  set  up,   so  WL682  exits. 

2.  Otherwise,    COUNT  is   incremented,  the     new     constraint     is     given 
index   1 1  *N   -  10  +  COUNT  and    sign  0. 

3.  The  right  hand   side  of  the     constraint,      B( COUNT),      is     assigned 
according   to   the  value  of  LEFT(J). 

4.6.18.3  Subroutine  linkage. 

Called  by:     WL68 
Calls:      None. 
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4.6.18.4  Local  Variables. 
None. 

4.6.18.5  Outside  Variables. 

Altered:   from  WL68  —  COUNT,  I,  S,  B 
Used:  from  WL68  —  J 

from  MAXBAND  —  N,  LEFT 


4.6.19  Subroutine  WL683. 
4.6.  19. 1  Purpose. 


Writes  LINP  card  6  for  the  left  turn  choice  constraints  of   a 
intersection  (8)  when  only  the  inbound  left  turn  split  is  non-zero. 

4.6.  19.2  Synopsis. 

1.  IF  LEFT(J)  is  0,  15,   7,   11,   13,   14,   3,   5,   10  or  12,   no 
additional  constraints  need  to  be  set  up,  so  WL683  exits. 

2.  Otherwise,  COUNT  is  incremented,  the  new  constraint  is  given 
index  1 1  *N  -  10  +  COUNT  and  sign  0. 

3.  The  right  hand  side  of  the  constraint,  B(COUNT),  is  assigned 
according  to  the  value  of  LEFT(J). 

4.6.19.3  Subroutine  linkage. 

Called  by:     WL68 
Calls:      None. 

4.6.19.4  Local  Variables. 
None. 

4.6.19.5  Outside  Variables. 

Altered:   from  WL68  —  COUNT,  I,  S,  B 
Used:  from  WL68  —  J 

from  MAXBAND  —  N,  LEFT 
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4.6.20     Subroutine  LINP8. 

4.6.20.1  Purpose. 

Writes  LINP  card  8,  which  contains  the  left  hand  sides  —  the  decision 
variables  and  their  coefficients  —  of  the  constraints. 

4.6.20.2  Synopsis. 

After  LINP6  has  generated  the  signs  and  right  hand  sides  of  the 
constraints,  LINP8  generates  the  left  hand  sides.  These  contain  the 
decision  variables  and  their  coefficients.  The  information  is  presented 
to  MPCODE  in  LINP  card  8  card  images. 

Steps: 


1.  LINP8  calls  WL82,  WL83,  WL84A,  WL84B,  WL85,  WL86A  AND  WL86B  to 
write  the  LINP  card  8  images  for  constraint  sets  2  to  6B. 

2.  Unless  the  artery  has  only  2  intersections,  WL7A  and  WL7B  are 
called   to  write  the  card  8  images  for  constraint  set  7A  and  7B . 

3.  WL88  writes  the  card  images  for  constraint  set  8. 

4.6.20.3  Subroutine  linkage. 

Called  by:  MATGNA 

Calls:  WL82,  WL83,  WL84A,  WL84B,  WL85,  WL86A,  WL86B,  WL87A,  WL87B, 
WL88 

4.6.20.4  Local  Variables. 
None. 

4.6.20.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNA   —  DELTAC,    NM1    (passed   as  a  value),      NM2      (passed 

as  a  value) 
from  MAXBAND   —  N,    LEFT,    K,    L,    LBAR,    D,      DBAR,      E,      EBAR,      F, 
FBAR,    IG,    IGBAR,    IH,    IHBAR 

Note:      NM1   and   NM2,    which  contain  the  values  N-1    and   N-2,    are  passed   as 
values  from  MATGNA. 


4.6.21      Subroutine  WL82 . 
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4.6.21.1  Purpose. 

Writes  LINP  card  8  —  the  left  hand  sides  of  the  constraints  —  for  the 
bandwidth  equation  (2). 

4.  6.21 .2  Synopsis. 

The  expression 

-K*B(1  )  +  B(2) 

is  set  up  as  the  left  hand   side  of  constraint   1,   the  bandwidth  constraint. 

4.6.21.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 

4.6.21.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)         Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

L  Iteration  variable. 

4.6.21.5  Outside  Variables. 

Altered:  None. 

Used:      from  MAXBAND  —  K 


4.6.22     Subroutine  WL83 . 

4.6.22.  1    Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  cycle  constraints  (3). 
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4.6.22.2  Synopsis. 

The  left  hand  side  of  the  cycle  constraints  (indices  2  and  3)  are  set 
up  as 


4.6.22.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 

4.6.22.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(1  )  Indices  of  decision  variables. 

Real: 

A(1)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

L  Iteration  variable. 

4.6.22.5  Outside  Variables. 

Altered:  None. 
Used:  None. 


4.6.23  Subroutine  WL84A. 

4.6.23.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  outbound  bandwidth  in  green  period  constraints  (4A). 

4.6.23.2  Synopsis. 

There  are  N     constraints,      with     indices     4     through     N  +  3.        The     Kth 
constraint  has  left  hand   side 

W(K)  +  B(1  ) 
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4.6.23.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 

4.6.23.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

4.6.23.5  Outside  Variables. 

Altered:      None. 

Used:      from   MAXBAND.—  N 


4.6.24  Subroutine  WL84B. 

4.6.24.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  inbound  bandwidth  in  green  period  constraints  (4B) . 

4.6.24.2  Synopsis. 

There  are  N  constraints,  with  indices  N  +  4  through  2*N  +  3.   The  Kth 
constraint  has  left  hand  side 

WBAR(K)  +  B(2) 


4.6.24.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 
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4.6.24.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index   of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

4.6.24.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  N 


4.6.25  Subroutine  WL85. 

4.6.25.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  integer  constraints  (5). 

4.6.25.2  Synopsis. 

There  are  N  -  1    of  these     constraints,     with     indices     2*N   +  4     through 
3*N   +  2.      The  left  hand   sideof  constraint  K  is 

(W(I)    +WBARCD)    -    (W(I+1)    +WBARCI+D)  (A) 

+    (T(I)   +  TBAR(I))   -  M(I) 
+  DEL(I)*L(I)   -  DELBAR(I)*LBAR(I)  (B) 

-  DELCI+1  )*L(I+1  )   +  DELBARCI+1  )*LBAR(I+1) 

Part  (A)  of  the  expression  is  always  setup.  Only  the  terms  of  part  (B)  in 
which  L  or  LBAR  is  non-zero  are  set  up.  DELCNT  counts  the  number  of  DEL's 
which  have  been  set  up,  and  DLBCNT  the  number  of  DELBAR's.  The  DEL's  are 
given  indices  5*N  +  1  through  5*N  +  DELTAC,  and  the  DELBAR's 
5*N   +  DELTAC  +  1    through  5*N   +  DELTAC   +  DELTBC. 
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4.6.25.3  Subroutine  linkage. 

Called  by:     LINP8 
Calls:     None. 

4.6.25.4  Local  Variables. 
LINP  card  8  fields: 


Integer: 
I 
J  (7) 

Real: 
A(2) 


Index  of  constraint. 

Indices  of  decision  variables. 


Coefficients  of  decision  variables. 
Other  local   variables: 


Integer: 
DELCNT 
DLBCNT 
K 

KP1 
M 

LIMIT 
COUNT 


Number  of  DEL's  set  up  so   far. 

Number  of  DELBAR's  set  up  so   far. 

Number  of  current  constraint. 

K  +  1. 

Iteration  variable. 

Iteration  limit. 

Number  of  terms  of  part  (B)    entered   so  far. 


4.6.25.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNA   —  DELTAC 

from  MAXBAND   —  N,    LEFT,    L,    LBAR 


4.6.26     Subroutine  WL86A . 


4.  6.26.  1    Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  outbound  link  speed  constraints  (6A). 

4.6.26.2  Synopsis. 

There  are  2*N  -  2  of  these  constraints,  with  indices  3*N  +  3  through 
5*N.  Each  two  consecutive  constraints,  starting  with  3*N  +  3  and  3*N  +  4, 
have  the  left  hand  sides 

(D(I)/F(I))*Z  -  T(I)   and   (D(I  )/E(I  ))*Z  -  T(I ) . 

These  constraints  are  derived  from  the  compound  constraint 
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(D(I)/(F(I))*Z      <      T(I)      <      (D(I)/E(I))*Z 


4.6.26.3  Subroutine  linkage. 

Called  by:     LINP8 
Calls:      None. 

4.6.26.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)         Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.6.26.5  Outside  Variables. 

Altered:      None. 

Used:      from  LINP8  —  NM1    (passed   as  a  value) 
from   MAXBAND  —  N,    D,    E,    F 

Note:      NM1,    which  has  value   N-1 ,    is  passed   as  a  value    from  LINP8. 


4.6.27     Subroutine  WL86B . 

4.6.27.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  inbound  link  speed  constraints  (6B) . 

4. 6.27.2  Synopsis. 

There  are  2*N  -  2  of  these  constraints,  with  indices  5*N  +  1  through 
7*N  -  2.  Each  two  consecutive  constraints,  starting  with  5*N  +  1  and 
5*N  +  2,  have  the  left  hand  sides 

(DBAR(I)/FBAR(I))*Z  -  T(I) 
and 

(DBAR(I)/EBAR(I))*Z  -  T  (I ) . 
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These  constraints  are  derived  from  the  compound  constraint 

(DBAR(I)/(FBAR(*I))*Z  <  T(I)   <   (DBAR  (I  )/EBAR  (I )  )*Z 

4.6.27.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 

4.6.27.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.6.27.5  Outside  Variables. 

Altered:      None. 

Used:     from  LINP8  —  NM1    (passed   as  a  value) 
from  MAXBAND   —  N,    DBAR,    EBAR,    FBAR 

Note:      NM1,   which  has  value   N-1 ,    is  passed   as  a  value   from  LINP8. 


4.6.28     Subroutine  WL87A. 

4.6.28.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  outbound  change  in  speed  between  links  constraints  (7A). 

4.6.28.2  Synopsis. 

There  are  2*N  -  4  of  these  constraints,  with  indices  7*N  -  1  to 
9*N  -  6.  Each  two  consecutive  constraints,  starting  with  7*N  -  1  and  7*N, 
have  the  left  hand  sides 

(D(I)*IH(I))*Z  -  (D(I)/D(I+1))*T(I+1)  +  T(I) 
and 
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(D(I)*IG(I))*Z  -  (D(I)/D(I+1))*T(I+1)  +  T(I) 

These  constraints  are  derived  from  the  compound  constraint 

(D(I)*IH(I))*Z  < 

(D(I)/D(I+1))*T(I+1)  -  T(I) 

<  (D(I)*IG(I))*Z 


4.6.28.3  Subroutine  linkage. 

Called  by:     LINP8 
Calls:     None. 

4.6.28.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(3)  Indices  of  decision  variables. 

Real: 

A(3)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.6.28.5  Outside  Variables. 

Altered:     None. 

Used:     from  LINP8  —  NM1    (passed   as     a     value),     NM2     (passed     as     a 

value) 
from  MAXBAND  —  N,    D,    IG,    IH 

Note:      NM1   and   NM2,    which  have  values  N-1    and   N-2,    are  passed   as  values 
from  LINP8. 


4.6.29     Subroutine  WL87B. 

4.6.29.1   Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  inbound  change  in  speed  between  links  constraints  (7B) . 
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4.6.29.2  Synopsis. 

There  are  2*N  -4  of  these  constraints,  with  indices  9*N  -  7  to 
1 1 *N  -  10.  Each  two  consecutive  constraints,  starting  with  7 *N  —  1  and 
7*N,  have  the  left  hand  sides 

(DBAR(I)*IHBAR(I))*Z  -  (DBAR  (I  )/DBAR  (1+1  )  )*T  (1+1  )  +  T  (I ) 
and 

(DBAR(I)*IGBAR(I))*Z  -  (DBAR  (I  )/DBAR  (1+1  )  )*T  (1+1  )  +  T  (I ) 

These  constraints  are  derived  from  the  compound  constraint 

(DBAR(I)*IHBAR(I))*Z  <_ 
(DBAR  (I) /DBAR  (1+1  ))*T  (1+1  )  -  T  (I ) 
<  (DBAR(I)*IGBAR(I))*Z 


4.6.29.3  Subroutine  linkage. 

Called  by:  LINP8 
Calls:   None. 

4.6.29.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(3)         Indices  of  decision  variables. 

Real: 

A(3)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.6.29.5  Outside  Variables. 

Altered:      None. 

Used:     from  LINP8  —  NM1    (passed   as     a     value),      NM2      (passed     as     a 

value) 
from   MAXBAND   —  N,    DBAR,    IGBAR,    IHBAR 

Note:      NM1   and   NM2,    which  have  values  N-1    and   N-2,    are  passed   as  values 
from  LINP8. 
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4.6.30  Subroutine  WL88. 

4.6.30.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  left  turn  choice  constraints  (8). 

4. 6. 30.2  Synopsis. 

There  are  CNCNT  of  these  contraints;  there  can  be  up  to  2*N  of  them. 
They  have  indices  1 1  *N  -  9  to  1 1  *n  -  10  +  CNCNT. 

For  each  intersection  K,  WL88  calls  WL881  to  write  the  LINP  card  8 

images  if  both  left  splits  are  non-zero.  WL88  calls  WL882  or  WL883  if 

only  the  outbound  or  inbound  left  splits,  respectively,  are  non-zero.  If 
both  splits  are  zero,  there  are  no  constraints  to  be  set  up. 

DELCNT  and  DLBCNT  are  the  numbers  of  the  next  DEL  and  DELBAR  to  be 
used,  and  COUNT  is  the  number  of  set  8  constraints  set  up  so  far.  DELCNT 
and  DLBCNT  are  incremented  as  required  at  each  intersection. 

4.6.30.3  Subroutine  linkage. 

Called  by:     LINP8 

Calls:     WL881,   WL882,   WL883 

4.6.30.4  Local  Variables. 

Integer: 

COUNT        Number  of  set  8  constraints  set  up  so  far. 
DELCNT       Number  of  next  DEL  to  be  set  up. 

DLBCNT  (      Number  of  next  DELBAR  to  be  set  up. 
K  Number  of  current  intersection. 

4.6.30.5  Outside  Variables. 

Altered:  None. 

Used:   from  MATGNA  —  DELTAC 

from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.6.31  Subroutine  WL881  . 

4.6.31.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  left  turn  choice  constraints  (8)  when  both  left  splits  are 
non-zero. 
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4. 6. 31 .2  Synopsis. 


1.  If  LEFT(K)  is  0  or  15,  no  constraint  is  neeeded,  and  W1881 
exits. 

2.  If  LEFT(K)  is  7,  11,  13,  14,  3  or  LEFT(K)  is  12  and  L(K)  not  = 
LBAR(K),  only  one  constraint  is  needed.  COUNT  is  incremented 
and  the  constraint  is  given  index  1 1  *N  -  10  +  COUNT.  The  left 
hand   sides  are 

LEFT(K)  left  hand  side 

7,11,3  DEL(K)   +  DELBAR(K) 

13  -DEL(K)   +  DELBAR(K) 

14,12  DEL(K)   -  DELBAR(K) 


3.  If  LEFT(K)  is  5,  10,  6  or  9,  one  constraint  is  needed.  COUNT  is 
incremented  and  the  constraint  is  given  index  1 1  *N  -  10  +  COUNT. 
The  left  hand  sides  are: 

LEFT(K)     left  hand  side 

5,10  DEL(K) 

6,  9         DELBAR(K) 


4.  If  LEFT(K)  is  12  and  L(K)  =  LBAR(K),  or  LEFT(K)  is  1,  2,  4  or  8, 
two  constraints  are  needed.  The  constraints  are  given  the  next 
two  free  indices  (11*N  -  10  +  initial  value  of  COUNT  +  1, 
1*N  -  10  +  initial  value  of  COUNT  +2)  and  COUNT  is  incremented 
by  2.  The  left  hand  side  of  the  first  constraint  is  DEL(K),  and 
the  left  hand  side  of  the  second  constraint  is  DELBAR(K). 

4.6.31.3  Subroutine  linkage. 

Called  by:     WL88 
Calls:     None. 

4.6.31.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

1(2)         Indices  of  constraints. 

J(2,2)  Indices  of  decision  variables.  The  first  index  of  J 
is  the  variable  number  in  the  constraint,  and  the 
second  is  the  number  of  the  constraint. 

Real: 

A(2,2)  Coefficients  of  decision  variables.      Indices     are     as 

for  J. 
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Other  local  variables: 

Integer: 
M  Iteration  variable. 

4.6.31.5  Outside  Variables. 

Altered:  from  WL88  —  COUNT 

Used:   from  WL88  —  DELCNT,  DLBCNT,  K 

from  MATGNA  —  DELTAC 

from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.6.32  Subroutine  WL882 . 

4.6.32.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand   sides  of     the     constraints 
for     left  turn  choice  constraints   (8)   when  only  outbound   left  split  is 
non-zero . 

4.6.32.2  Synopsis. 


1.  If  LEFT(K)  is  0,  15,  7,  11,  13,  14,  3,  6,  9  or  12,  no  constraint 
is  needed  and  WL882  exits. 

2.  If  LEFT(K)  is  5,  10,  1,  2,  4,  or  8,  one  constraint  is  needed. 
COUNT  is  incremented,  and  the  constraint  is  given  index 
1 1  *N  -  10  +  COUNT.   The  left  hand  side  is 

DEL(K). 


4.6.32.3  Subroutine  linkage. 

Called  by:     WL88 
Calls:      None. 

4.6.32.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J  Index  of  decision  variable. 

Real: 

A  Coefficient  of  decision  variable. 

Other  local  variables: 
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Integer: 

L  Iteration  variable. 

4.6.32.5  Outside  Variables. 

Altered:      from  WL88  —  COUNT 

Used:      from  WL88  —  DELCNT,    K 
from  MAXBAND   —  N,    LEFT 


4.6.33     Subroutine  WL883. 

4.  6.  33. 1   Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  left  turn  choice  constraints  (8)  when  only  inbound  left  split  is 
non-zero. 

4.6. 33.2  Synopsis. 


1.  If  LEFT(K)  is  0,  15,  7,  11,  13,  14,  3,  5,  10  or  12,  no 
constraint  is  needed  and  WL882  exits. 

2.  If  LEFT(K)  is  6,  9,  1,  2,  4,  or  8,  one  constraint  is  needed. 
COUNT  is  incremented,  and  the  constraint  is  given  index 
11*N  -  10  +  COUNT.   The  left  hand  side  is 

DELBAR(K). 


4.6.33.3  Subroutine  linkage. 

Called  by:     WL88 
Calls:     None. 

4.6.33.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J  Index  of  decision  variable. 

Real: 

A  Coefficient  of  decision  variable. 


Other  local  variables: 

Integer: 

L  Iteration  variable. 
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4.6.33.5  Outside  Variables. 

Altered:  from  WL88  —  COUNT 

Used:   from  WL88  —  DLBCNT,  K 

from  MATGNL  —  DELTAC 

from  MAXBAND  —  N,  LEFT 


4.6.34  Subroutine  NINES. 
4.6.34.  1  Purpose. 

Writes  BB  card  3  and  LINP  cards  3,  5,  7  and  9. 

4. 6. 34. 2  Synopsis. 

These  cards  are  delimiters  of  the  various  sections  of  the  input  file. 
NINES  writes  a  card  image  with  all  9's  in  its  first  10  columns  and  the 
remaining  columns  blank. 

4.6.34.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.34.4  Local  Variables. 

4.6.34.5  Outside  Variables. 

Altered:      None. 
Used:     None. 


4.6.35     Subroutine  MORE. 

4.  6.  35. 1    Purpose. 

Writes  card  telling  MPCODE  there  are  no  further  runs. 

4. 6. 35.2  Synopsis. 

The  card  image  written  has  a  0  in  column  10,  with  the  rest  of  the  card 
blank. 
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4.6.35.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.35.4  Local  Variables. 


4.6.35.5  Outside  Variables. 

Altered:   None. 
Used:  None. 


4.6.36  Subroutine  EOF. 

4.6.36.1  Purpose. 

Closes  the  MPCODE  input  file. 

4. 6. 36. 2  Synopsis. 

Issues  an  ENDFILE  command   on   unit    11,    the  MPCODE   input   file, 

4.6.36.3  Subroutine  linkage. 

Called  by:     MATGNA 
Calls:      None. 

4.6.36.4  Local  Variables. 
None. 

4.6.36.5  Outside  Variables. 

Altered:      None. 
Used:      None. 


4. 7     Loop  Matrix  Generator  Subroutines, 
4.7.1      Subroutine  MATGNL. 
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4.7.1.1  Purpose. 

Controls  loop  problem  formulation. 

4.7. 1.2  Synopsis. 

MATGNL  calls  subroutines  which  generate  the  loop  problem  formulation  on 
file  11.  This  formulation  consists  of  constraints  for  each  of  the  three 
arteries  which  are  very  similar  to  a  single  artery  formulation,  plus  a 
loop  constraint.  Several  other  changes  from  the  single  artery  formulation 
have  also  been  made. 

Submodule  MATGNL  uses  many  subroutines  which  perform  essentially  the 
same  functions  as  those  in  MATGNA.  These  subroutines  have  names  made  up 
of  and   L  followed  by  the  name  of  the  corresponding   subroutine     in     MATGNA. 

The  basic  structure  of  subroutine  MATGNL  is  very  similar  to  that  of 
MATGNA.  MATGNL  calls  subroutines  LDLCNT  to  LEOF  which  perform  about  the 
same  functions  as  DLCNT  through  EOF  do  in  MATGNA.  In  addition  MATGNL 
calls  the  following   subroutines. 


1.  KCNT  determines  the  number  of  cross-artery  bandwdith  constraints 
(2B)    to  be  set  up. 

2.  GMCNT  determines  how  many  all-red  variables  (GAMMA's)  will  be 
set  up. 

3.  FSTART  establishes  values  to  be  added  to  the  indices  of  the 
decision  variables  and  constraints  in  each  of  the  three  sets  of 
artery  constraints  to  create  the  loop  formulation.  This  means 
that  what  is  essentially  a  single  artery  formulation  can  be 
generated  for  each  artery,  and  then  the  three  formulations  can 
be  modified   to  obtain  most  of  the  loop  formulation. 

In  addition,   note  that  the  GAMMA's  are  bounded   variables,   so   LLINP4     is 
not  called   if  DTOT  +  DBTOT  +  GMCNT  is   0. 

4.7.1.3  Subroutine  linkage. 

Called  by:     MATGEN 

Calls:      LDLCNT,    LCNCNT,    KCNT,    GMCNT,    FSTART,    LBBCAL,    LBBCQ,      LBBC2, 
LNINES,    LLINP4,    LLINP6,    LLINP8,    LMORE,    LEOF 

4.7.1.4  Local  Variables. 

DELTAC,  DELTBC,  CONCNT  and  NUMD  are  used  as  in  MATGNA.   They  have  been 
made  into  arrays  so  that  they  can  contain  a  value  for  each  artery. 

Integer: 

GAMCNT  Number  of  all-red   variables   (GAMMA's)    required. 

CSTART(4)  Indices   1,    2,    3  —  values  to   be  added      to     constraint 

indices       in     the     single     artery     formulations       of 


-      123  - 


VSTARK4) 


DTOT 

DBTOT 

KCOUNT 


arteries   1,    2  and  3  to  obtain  the     indices     used     in 

the  loop  formulation. 

Index     4     —     add     1    to  obtain  the  index  of  the  loop 

constraint. 
Indices   1,    2,    3  —  values  to     be     added     to     decision 

variable     indices     in  the  single  artery  forumlations 

of  arteries   1,    2  and  3  to  obtain  the  indices  used   in 

the  loop  formulation. 

Index  4   —  add   1   to  obtain  the     index     of     the     loop 

variable. 
DELTACO)  +  DELTAC(2)  +  DELTAC(3)  ~  total   number     of 

outbound   left  turn  decision  variables  (DEL's). 
DELTBC(I)   +  DELTBC(2)  +  DELTBC(3)  —  total   number     of 

inbound   left  turn  decision  variables  (DELBAR's). 
Number  of  cross-artery  bandwidth  constraints   (2B)      to 

be  set  up. 


4.7.1.5  Outside  Variables. 

Altered:   None. 

Used:  The  same  variables  as  in  MATGNA  are  used.  However,  the 
entire  variable  is  used  in  MATGNL,  rather  than  just  the  portion 
with  information  about  artery  1.  In  addition,  the  variable  INTER, 
declared  in  MAXBAND,  is  used. 


4.7.2  Subroutine  LDLCNT . 
4.  7.2.  1  Purpose. 

Finds  number  of  left  turn  variables  (DEL's  and  DELBAR's)  required. 

4.7.2.2  Synopsis. 

This  subroutine  is  a  modified  version  of  subroutine  DLCNT.  A  DO  100 
loop  has  been  placed  around  the  body  of  the  subroutine  so  that  counts  of 
the  DEL's  and  DELBAR's  requried  can  be  made  for  each  artery.  The 
variables  N,  DELTAC,  DELTBC,  L(I),  LBAR(I)  and  NUMD  have  been  replaced 
with  N(ART),  DELTAC(ART),  DELTBC(ART),  L(I,ART),  LBAR(I.ART)  AND 
NUMD(ART).      Otherwise,   the  subroutine  is  essentially  the  same  as  DLCNT. 

4.7.2.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.2.4  Local  Variables. 


Integer: 
ART 
I 
LIMIT 


Number  of  current  artery. 
Number  of  current  intersection. 
Iteration  limit. 
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4.7.2.5  Outside  Variables. 

Altered:   from  MATGNL  —  DELTAC,  DELTBC,  NUMD 

Used:   from  MAXBAND  —  N,  L,  LBAR  (LEFT  is  not  used.) 


4.7.3  Subroutine  LCNCNT . 
4.7.3.1  Purpose. 


Finds  the  number  of  left  hand  choice  (set  8)  constraints  required. 
This  subroutine  is  the  loop  version  of  CNCNT. 

4.7.3.2  Synopsis. 

Depending  on  the  left  turn  patterns  to  be  considered     and     whether     the 

left     turn     splits  are  non-zero,  up  to  2   set  8    constraints  may  be  required 

for  each  intersection.      CONCNT(ART)    is  set  to   the  total   number     of     set     8 
constraints  required   for  artery  ART. 


1.  CONCNT(ART)    is   initially  set  to  0. 

2.  At  each  intersection  I,  CONCNT(ART)  is  incremented  by  0,1,  or  2, 
depending  on  the  values  of  L(T.ART),  LBAR  (I,  ART)  and 
LEFT(I.ART). 

4.7.3.3  Subroutine  linkage. 

Called   by:     MATGNL 
Calls:      None. 

4.7.3.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

ART  Number  of  current  artery. 

LIMIT  Iteration  limit. 

4.7.3.5  Outside  Variables. 

Altered:      from  MATGNL  —  CONCNT 

Used:      from  MAXBAND   —  N,    LEFT,    L,    LBAR 
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4.7.4     Subroutine  KCNT. 

4.7.4.  1   Purpose. 

Counts  the  number  of  cross-artery  bandwidth  constraints  (2B)  to  be  set 
up. 

4.7.4.2  Synopsis. 

Equations  relating  outbound  bandwidth  will  be  set  up  for  each  of  K(4), 
K(5)  and  K(6)  wich  is  non-zero.  The  number  of  such  equations  is  placed  in 
KCOUNT. 

4.7.4.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.4.4  Local  Variables. 

Integer: 

I  Iteration  variable. 

4.7.4.5  Outside  Variables. 

Altered:   from  MATGNL  —  KCOUNT 
Used:   from  MAXBAND  —  K 


4.7.5  Subroutine  GMCNT. 

4.7.5.1  Purpose. 

Counts  the  number  of  all-red  period  apportionment  variables  (GAMMA's) 
required . 

4.7.5.2  Synopsis. 

4 
At  each  of  the  artery  meetings,  it  is  possible  that  there  will  be 
portions  of  the  cycle  which  are  not  available  to  either  the  main  or  the 
cross  street.  There  may  be  two  such  periods,  one  at  each  end  of  the  cross 
street  phase.  The  GAMMA's  decide  how  the  all-red  time  should  be  divided 
between  the  two  periods. 

For  each  artery  meeting,  GMCNT  computes  the  total  duration  of  any 
all-red  periods,  and  places  the  value  in  ALLRED.  If  ALLRED  >  0,  a 
variable,  GAMMA,  is  required  to  distribute  the  all-red  time  on  either  side 
of  the  cross  street  phase.  GAMCNT,  the  number  of  GAMMA's  required,  is 
initially  set  to  0   and  then  incremented   for  each  ALLRED  >  0. 
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4.7.5.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.5.4  Local  Variables. 

Integer: 

ART1         First  artery  at  current  artery  meeting. 

ART2         Second  artery  at  current  artery  meeting  —  (ART1  +  1) 

mod  3 
INTER1       Signal  number  in  ART1  at  current  artery  meeting. 
INTER2       Signal  number  in  ART2  at  current  artery  meeting. 

Real: 

ALLRED  All-red   time  at  current  artery  meeting. 

4.7.5.5  Outside  Variables. 

Altered:   from  MATGNL  —  GAMCNT 

Used:   from  MAXBAND  —  INTER,  R,  LBAR 


4.7.6  Subroutine  FSTART . 

4.7.  6. 1  Purpose  . 

Finds  the  offsets  to  be  added  to  the  variable  and  constraint  indices  of 
the  three  arteries  and  the  loop  constraint. 

4.  7.  6.2  Synopsis. 

As  discussed  in  chapter  2,  the  loop  formulation  has  3  sections: 

1.  The  bandwidth  and  cycle  constraints  (2A,2B,3); 

2.  The  remaining  single  artery  constraints  for  each  of  the  three 
arteries  (4A  to  8);   and 

3.  The  loop  constraint  (9). 

The  variables  and  constraints  for  each  artery  are  generated  just  as 
they  are  for  a  single  artery.  However,  since  these  variables  and 
constraints  appear  in  different  locations  in  the  loop  and  single  artery 
formulations,  values  must  be  added  to  their  single  artery  indices. 

FSTART  places  these  values  in  CSTART  and  VSTART.  VSTART(I),  VSTART(2), 
VSTARTC3)  and  CSTART (1),  CSTART(2),  CSTARTC3)  are  the  values  which  must  be 
added  to  the  indices  of  variables  and  constraints  in  arteries  1,  2  and  3, 
respectively.   VSTART(4)  and  CSTART(4)  give  the  offset  of  the  loop  integer 
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variable  n(L)   and   the  loop  constraint. 

4.7.6.3  Subroutine  linkage. 

Called   by:     MATGNL 
Calls:     None. 

4.7.6.4  Local  Variables. 
None. 

4.7.6.5  Outside  Variables. 

Altered:   from  MATGNL  —  CSTART,  VSTART. 

Used:   from  MATGNL  —  DELTAC,  DELTBC,  CONCNT,  KCOUNT 
from  MAXBAND  —  N 


4.7.7  Subroutine  LBBCAL . 

4.7.7.1  Purpose. 

Writes  first  two  MPCODE  input  cards.  This  subroutine  is  identical  to 
BBC ALL. 

4.7.7.2  Synopsis. 

The  version  of  MPCODE  used  in  MAXBAND  requires  the  input  to  begin  with 
a  card  containing  the  run  number,  which  is  always  1  in  MAXBAND,  and  a  card 
calling  the  branch  and  bound   routine  (BB)    with  the  letters  BB. 

4.7.7.3  Subroutine  linkage. 

Called  by:  MATGNL 
Calls:   None. 

4.7.7.4  Local  Variables. 
None. 

4.7.7.5  Outside  Variables. 

Altered:      None. 
Used:      None. 
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4.7.8     Subroutine  LBBC1  . 

4.7.8.1  Purpose. 

Writes  BB  card  1 ,  which  contains  the  general  parameters  required  by  the 
MPCODE  branch  and  bound  routine  (BB).  This  subroutine  is  the  loop  version 
of  BBC1. 

4.7.8.2  Synopsis. 

The  values  required  on  BB  card  1  are  placed  in  field  variables  M 
through  IREST,    and   the  card   is  written  on   file   11. 

4.7.8.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.8.4  Local  Variables. 
BB  card   1    fields: 


Integer: 
M 
NV 

ONUMD 
INTOBJ 
IPRBB 
ITRBBM 
IRBBM 
IREST 


Number  of  constraints. 

Number  of  variables. 

Number  of  discrete  (integer)  variables  (NUMD). 

MPCODE  parameters  which  are  0  in  MAXBAND. 

Maximum  number  of  BB  iterations  (MAXRBB). 
Maximum  number  of  BB  reinversions  (MAXIBB). 
Restart  indicator  (RESTRT)  — 

0  -  job  is  not  a  restart; 

1  -  job  is  a  restart. 


Other  local  variables: 


Integer: 
NTOT 
DTOT 
DBTOT 
CONTOT 


Total  number  of  intersections  in  arteries. 

Total  number  of  DEL's   in  arteries. 

Total  number  of  DELBAR's   in  arteries. 

Total  number  of  set  8   constraints. 


4.7.8.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNL  —  DELTAC,    DELTBC,    CONCNT,    NUMD,    GAMCNT,    KCOUNT 
from  MAXBAND  —  N,    MAXRBB,    MAXIBB,    RESTART 
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4.7.9     Subroutine  LBBC2 . 

4.7.9.1  Purpose. 

Writes  BB  card  2,  which  declares  the  integer  variables  and  gives  their 
step  size.  This  subroutine  is  the  loop  version  of  BBC2. 

4.7.9.2  Synopsis. 

For  each  artery,  the  discrete  (integer)  variables,   which  are     the     m's, 

DEL's       and     DELBAR's,       are       declared  as  decision  variables 

4*N(ART)   +  2   +  VSTART(ART)   to  4*N(ART)   +  1  +  NUMD  +  VSTART(ART)   and     given 
a  step  size  of   1. 

In  addition,   the  loop  variable  n(L)   is  given  index  VSTART(4)     +     1      and 
step  size    1. 

4.7.9.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.9.4  Local  Variables. 

BB  card  2  fields: 

Integer: 

J(59)        Indices  of  discrete  decision  variables. 
JDISCC59)     Step  sizes  of  the  discrete  variables. 

Other  local  variables: 

Integer: 

I  Number  of  current  discrete  variable. 

ART  Number  of  current  artery. 

LIMIT  Iteration  limit. 

4.7.9.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNL  —  NUMD,    VSTART 
from  MAXBAND   —  N 


4.7.10     Subroutine  LLINP1  . 
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4.7.10.1  Purpose. 

Writes  LINP  card  1 ,  which  contains  the  general  parameters  required  by 
MPCODE  for  a  linear  program.  This  subroutine  is  the  loop  version  of 
LINP1. 

4.7. 10.2  Synopsis. 

The  values  required  on  LINP  card  1  are  placed  in  variables  M  through 
IRMAX,    and   the  card    is  written  on   file   11. 

4.7.10.3  Subroutine  linkage. 

Called   by:     MATGNL 
Calls:      None. 

4.7.10.4  Local  Variables. 

LINP  card   1    fields: 

Integer: 

M  Number  of  constraints. 

NV  Number  of  variables. 

ISBND  Number  of  bounded   variables. 

MOREPR  An   MPCODE     output      specification     —     always        3       in 

MAXBAND. 

ITRMAX  Maximum  number  of  LP  iterations   (MAXITR). 

IRMAX  Maximum   number  of  LP  reinversions   (MAXINV). 

Other  local   variables: 

Integer: 

NTOT  Total  number  of  intersections  in  arteries. 

DTOT  Total  number  of  DEL's   in  arteries. 

DBTOT  Total  number  of  DELBAR's   in  arteries. 

C0NT0T  Total  number  of  set  8    constraints. 

4.7.10.5  Outside  Variables. 

Altered:  None. 

Used:   from  MATGNL  —  DELTAC,  DELTBC,  CONCNT,  GAMCNT,  KCOUNT 
from  MAXBAND  —  N,  MAXITR,  MAXINV 


4.7.11  Subroutine  LLINP2 
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4.7.11.1  Purpose. 

Writes  LINP  card  2,  which  contains  the  objective  function.  This 
subroutine  is  the  loop  version  of  LINP2. 

4. 7. 11.2  Synopsis. 

The  indices  of  the  bandwidth  variables,  B(1)  and  B(6),  and  their 
weights,  C(1)  to  C(6),  are  entered  into  J  and  OC,  respectively,  and  the 
card  is  written  on  file  11. 

4.7.11.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:     None. 

4.7.11.4  Local  Variables. 

LINP  card  2  fields: 

Integer: 

J(2,3)  Indices  of  bandwidth  variables. 

Real: 

OC(2,3)  Weights  of  bandwidth  variables. 

Other  local  variables: 

Integer: 

I  Direction  —  0  -  outbound; 

1  -  inbound . 
ART  Number  of  current  artery. 

4.7.11.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  C 


4.7.12  Subroutine  LLINP4. 


4.7.12.1  Purpose. 


Writes  LINP  card  4,   which  contains  the  upper  limits  on  bounded 
variables.   LLINP4  is  the  loop  version  of  LINP4. 


-  132  - 


4.7. 12.2  Synopsis. 

The  bounded  variables  are  the     left     turn     choice     variables,      DEL     and 
DELBAR,    and   the  all-red   variables,   the  GAMMA' s. 

For  each     artery     ART,      the     DEL's     and  DELBAR's     are     given        indices 

5*N(ART)   +  1    +  VSTART(ART)  through 
5*N(ART)   +  DELTAC(ART)  +  DELTBC(ART)  +  VSTART(ART),    and   upper  bounds  of   1. 

The  GAMMA's  are  given   indices  of  VSTART(4)  +  2  to     VSTART(4)  +   1    +  GAMCNT. 

They     also     have  upper  bounds  of   1.      Note,  however,   that  while  the  GAMMA's 

are  continuous  between  0   and   1,   the     DEL's  and     DELBAR's     may     only     take 

values  of  0  or  1.      The  lower  bounds  of  all  the  variables  are  0   by  default. 
The  card   image  is  written  on  file   11. 


4.7.12.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 

4.7.12.4  Local  Variables. 

LINP  card  4  fields: 

Integer: 

J(43)  Indices  of  bounded  variables. 

Real: 

BOUND (43)     Upper  bounds  of  bounded  variables  —  always  1. 

Other  local  variables: 

Integer: 

I  Number  of  current  variable. 

ART  Number  of  current  artery. 

LIMIT  Iteration  limit. 

4.7.12.5  Outside  Variables. 

Altered:  None. 

Used:   from  MATGNL  —  DELTAC,  DELTBC,  GAMCNT,  VSTART 
from  MAXBAND  —  N 


4.7.13  Subroutine  LLINP6. 
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4.7.  13.  1  Purpose. 

Writes  LINP  card  6,  which  contains  the  right  hand  sides  (constant 
portions)  and  signs  (  =  ,  <_»>.)  of  the  constraints.  LLINP6  is  the  loop 
version  of  LINP6. 

4.7. 13.2  Synopsis. 


1.   LWL623  writes  LINP  card  6  for  the  bandwidth  equations  (2A.2B) 
and  the  cycle  time  constraints  (3). 

For  each  artery: 

2.  LWL64A  writes  LINP  card  6  for  the  outbound  bandwidth  in 
the  green  period  constraints  (4A). 

3.  LWL64B  writes  the  card  for  the  inbound  bandwidth  in  the 
green  period  constraints  (4B) . 

4.  LWL65  writes  the  card  for  the  integer  constraints  (5). 

5.  LWL667  writes  the  card   for   the   speed   constraints 
(6A,6B,7A,7B). 

6.  LWL68  writes  the  card  for  the  left  turn  choice  constraints 
(8). 

For  the  entire  loop: 

7.  WL69  writes  the  card  for  the  loop  constraint  (9). 

4.7.13.3  Subroutine  linkage. 

Called   by:     MATGNL 

Calls:      LWL623,    LWL64A,    LWL64B,    LWL65,    LWL667,    LWL68,    WL69 

4.7.13.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

4.7.13.5  Outside  Variables. 

Altered:      None. 

Used:      from   MATGNL   —  CSTART,    KCOUNT 

from   MAXBAND   —  N,    LEFT,    K,    T,    R,    RBAR,    L,    LBAR,    TAU,    TAU3AR, 
INTER 
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4.7.14     Subroutine  LWL623. 

4.7. 14.  1   Purpose. 

Writes  LINP  card  6  for  the  bandwdith  and  cycle  time  constraints  (sets  2 
and  3).  LWL623  is  the  loop  version  of  WL623. 

4.7. 14.2  Synopsis. 


1.  In  the  DO  100  loop,  the  inter-artery  bandwidth  constraints  (2A) 
are  given  indices  1,  2,  and  3.  Their  signs  and  right  hand  sides 
are 

=  0  if  k  =  1 
>  0  if  k  <  1 
<  0       if  k  >   1 


2.  In  the  DO  200  loop,  a  constraint  with  index  3  +  COUNT  is  set  up 
for  each  of  K(4)  -  K  (6 )  which  is  non-zero  (2B)  .  Each  constraint 
is  given  an  =,  \  °f  S.  siSn»  depending  on  whether  the 
corresponding  K  is  1,  <_  1 ,  or  >_  1 .  The  constraints  are  given 
right  hand   sides  of  0. 

3.  The  cycle  constraints  (3)  are  given  indices  of  4  +  KCOUNT  and 
5   +  KCOUNT.        Constraint   4  +  KCOUNT  has  sign  and   right  hand   side 

>   1/T(2) 

while  constraint  5   +  KCOUNT  has  sign  and  right  hand   side 

<    1/T(1) 

4.7.14.3  Subroutine  linkage. 

Called  by:     LLINP6 
Calls:     None. 

4.7.14.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(8)         Indices  of  constraints. 

S(8)         Signs  of  constraints  —  0  -  =;   1  -  <}      2  -  >_. 

Real: 

B(8)  Right  hand   sides  of  constraints. 

Other  local  variables: 
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Integer: 

J  Iteration  variable. 

ART  Number  of  current  artery. 

COUNT  Number  of  cross-artery  bandwidth  constraints   (2B)    set 

up  so   far. 
LIMIT  Iteration  limit. 

4.7.14.5  Outside  Variables. 

Altered:      None. 

Used  :      from  MATGNL  —  KCOUNT 
from  MAXBAND  —  K,    T 


4.7.15     Subroutine  LWL64A . 

4.7.  15.  1   Purpose. 

Writes  LINP  card  6  for  outbound  bandwidth  in  green  period  constraints 
(4A).   LWL64A  is  the  loop  version  of  WL64A. 

4.7. 15.2  Synopsis. 

For  each  artery  ART,  the  set  4A  constraints  have  indices 
4  +  CSTART(ART)  to  N(ART)  +  3  +  CSTART(ART).  The  Jth  constraint  for 
artery  ART  is  given   sign  and   right  hand   side 

<   1    -  R  (J,  ART) 


4.7.15.3  Subroutine  linkage. 

Called  by:   LLINP6 
Calls:  None. 

4.7.15.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(20)        Indices  of  constraints. 
S(20)        Signs  of  constraints. 

Real: 

B(20)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Number  of  current  constraint. 
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4.7.15.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP6  —  ART 

from  MATGNL  —  CSTART 
from  MAXBAND  —  N,  R 


4.7.16  Subroutine  LWL64B. 


4.7.16.1  Purpose. 

Writes  LINP  card  6  for  inbound  bandwidth  in  green  period  constraints 
(4B).   LWL64B  is  the  loop  version  of  WL64B. 

4.7. 16.2  Synopsis. 

For  each  artery  ART,  the  set  4B  constraints  have  indices 
N(ART)  +  4  +  CSTART  (ART)  to  2*N(ART)  +  3  +  CSTART  (ART).  The  Jth 
constraint  for  artery  ART  is  given  sign  and  right  hand  side 

<    1  -  RBAR(J.ART) 

4.7.16.3  Subroutine  linkage. 

Called  by:   LLINP6 
Calls:   None. 

4.7.16.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(20)  Indices  of  constraints. 

S(20)  Signs  of  constraints. 

Real: 

B(20)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Number  of  current  constraint. 

4.7.16.5  Outside  Variables. 

Altered:     None. 

Used:      from  LLINP6  —  ART 

from   MATGNL  —  CSTART 
from   MAXBAND   —  N,    RBAR 
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4.7.17     Subroutine  LWL65. 

4.7.17.1    Purpose. 

Writes  LINP  card  6  for  the  integer  constraints  (5).  LWL65  is  the  loop 
version  of  WL65. 

4.7.  17.2  Synopsis. 

For  each  artery  ART,  there  are  N(ART)  -  1  constraints,  with  indices 
2*N(ART)  +  4  +  CSTART(ART)  through  3*N(ART)  +  2  +  CSTART(ART).  The  Jth 
constraint  of  artery  ART  has  sign  and  right  hand   side 

R(J+1,ART)  -  R(J,ART)   +  TAUBAR  (J ,  ART)  +  TAIKJ+1 ,  ART)  -  5 

5   is  subtracted   so  that  the  integer     variables     (m' s)      may     take     negative 
values. 

4.7.17.3  Subroutine  linkage. 

Called  by:  LLINP6 
Calls:   None. 

4.7.17.4  Local  Variables. 

LINP  card  6   fields: 

Integer: 

1(19)        Indices  of  constraints. 
SO  9)        Signs  of  constraints. 

Real: 

B( 1 9)  Right  hand   sides  of  constraints. 

Other  local   variables: 

Integer: 

J  Number  of  current  constraint. 

LIMIT        Iteration  limit. 

4.7.17.5  Outside  Variables. 

Altered:      None. 

Used:      from  LLINP6  —  ART 

from  MATGNL  —  CSTART 

from  MAXBAND   —  N,    LEFT,    R,    L,    LBAR,    TAU,    TAUBAR 
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4.7.18     Subroutine  LWL667 . 

4.7.18.1  Purpose. 

Writes  LINP  card  6  for  the  speed  constraints  (6A, 6B,7A,7B) .  LWL667  is 
the  loop  version  of  WL667. 

4.7. 18.2  Synopsis. 

There  are  8*N(ART)  -  1 2  of  these  constraints  for  each  artery  ART,  with 
indices  3*N(ART)  +  3  +  CSTART(ART)  to  1  1  *N  -  1 0  +  CSTART(ART).  Starting 
with  constraint  3*N(ART)  +  3,  the  successive  constraints  are  arranged  in 
pairs.  The  first  constraint  of  each  pair  always  has  sign  £,  while  the 
second  has  ^.     All  the  constraints  have  right  hand   sides  of  0. 

The  pairs  are  derived  from  the  compound  constraints  in  the  formulation. 
For  example,   the  compound   constraint 

(D(I)/F(I))*Z  <  T(I)   <   )D(I)/E(I))*Z 

for  a  particular  artery  is  represented   as 

(D(I)/F(I))*Z  -  T(I.)   <        and        (D  (I  )/E(I  ))*Z  -  T(I )    >  0. 

Note:  If  N(ART)  =  2,  the  iterations  limits  are  computed  differently  so  as 
not  to  generate  values  for  constraint  set  7.  However,  the  limits  are  the 
same  as  when  N(ART)  >  2. 

4.7.18.3  Subroutine  linkage. 

Called  by:      LINP6 
Calls:     None. 

4.7.18.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(148)  Indices  of  constraints. 

S(148)  Signs  of  constraints. 

Real: 

B(148)  Right   hand   sides  of  constraints. 

Other  local  variables: 

Integer: 

J  Number  of  current  constraint  or  constraint  pair. 

LIMIT        Iteration  limit. 
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4.7.18.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNL  —  CSTART 

Note:      Only  the  appropriate  value  of  CSTART  has  been     passed, 
from   MAXBAND   -  N 


4.7.19     Subroutine  LWL68 . 

4.7.19.1   Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  (8).  LWL68  is 
the  loop  version  of  WL68. 

4.7.  19.2  Synopsis. 

The  additional  constraints  required  to  restrict  the  left  turn  pattern 
to  a  certain  set  are  shown  in  appendix  A.  These  constraints  (8)  are  the 
last  in  the  formulation,  and  have  numbers 

11*N(ART)  -  9  +  CSTART  (ART) 
to 

11*N(ART)   -   10  +  CNCNT(ART)   +   CSTART  (ART). 

Steps: 


1.  The  count  of  these  constraints  for  the  current  artery  ART, 
COUNT,  is  set  to  0. 

2.  For  each  intersection  J,  the  left  turn  splits  L(J,ART)  and 
LBAR(J.ART)  are  examined.  If  both  splits  are  non-zero,  LWL681 
is  called  to  generate  the  LINP  card  6  values  for  the 
intersection  J  left  turn  choice  constraints.  If  only  L(J,ART) 
is  non-zero,  LWL682  is  called.  If  only  LBAR(J.ART)  is  non-zero, 
LWL683  is  called.  If  both  L(J,ART)  and  LBAR(J.ART)  are  zero,  no 
additional  constraints  are  required,  so  no  subroutine  is  called. 

3.  If  at  least  one  constraint  has  been  set  up  for  this  artery,  the 
LINP  cards  6  are  written. 

4.7.19.3  Subroutine  linkage. 

Called  by:   LLINP6 

Calls:  .LLWL681,  LWL682,  LWL683 

4.7.19.4  Local  Variables. 

LINP  card  6  fields: 

Integer: 

1(40)  Indices  of  constraints. 
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S(40)        Signs  of  constraints. 

Real: 

B(40)        Right  hand  sides  of  constraints. 

Other  local  variables: 

Integer: 

COUNT        Number  of  set  8  constraints  set  up  so  far. 
J  Number  of  current  intersection. 

4.7.19.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP6  —  ART 

from  MATGNL  —  CSTART 

Used:      from  MAXBAND   —  N,    LEFT,    L,    LBAR 


4.7.20     Subroutine  LWL681 . 

4.7.20.1  Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  (8)  when  both  a 
intersection's  left  turn  splits  are  non-zero.  LWL681  is  the  loop  version 
of  WL681. 

4.7.20.2  Synopsis. 


1.  If  LEFT(J.ART)  is  0  or  15,  all  or  no  left  choices  are  to  be 
considered.  In  these  cases,  no  additional  constraints  should  be 
set  up.  Note  that  LEFT(J.ART)  is  set  to  some  value  other  than  0 
by  the  INPUT  module  if  one  or  both  of  L(J,ART)  and  LBAR  (J,  ART) 
are  not  zero. 

2.  Otherwise,  the  constraint  count  (COUNT)  is  incremented,  and  the 
new  constraint  is  given  index 
11*N(ART)  -  10  +  COUNT  +  CSTART  (ART). 

3.  If  LEFT(J.ART)  is  7,  11,  13,  14,  3,  5,  6,  9,  10,  or  LEFT(J.ART) 
is  12  and  L(J,ART)  not  =  LBAR (J, ART),  only  one  additional 
constraint  is  needed.  S(COUNT)  is  set  to  the  sign  of  the 
constraint,  B( COUNT)  to  the  right  and  side,  and  LWL681  exits. 

4.  If  LEFT(J.ART)  is  1,  2,  4,  8  or  LEFT(J.ART)  =  12  and  L(J,ART)  = 
LBAR (J, ART),  then  two  constraints  are  needed.  After  the  right 
hand  sides  of  both  constraints  are  assigned  to  B( COUNT)  and 
BCCNTP1),  and  the  sign  of  the  first  constraint  (0)  is  assigned 
to  S(COUNT),  COUNT  is  incremented.  The  second  constraint  is 
assigned   index  11*N(ART)  -  10  +  COUNT  +  CSTART  (ART)  and  sign  0. 
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LWL681   then  exits. 

4.7.20.3  Subroutine  linkage. 

Called  by:      LWL68 
Calls:      None. 

4.7.20.4  Local  Variables. 

Integer: 

CNTP1  COUNT  +  1 

4.7.20.5  Outside  Variables. 

Altered:      from  LWL68  --  COUNT,    I,    S,    B 
Used:     from  LWL68  —  J 

from  LLINP6  —  ART 

from   MATGNL  —  C START 

from  MAXBAND   —  N,    LEFT,    L,    LBAR 


4.7.21      Subroutine  LWL682. 

4.7.21.  1    Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  of  a 
intersection  (8)  when  only  the  outbound  left  turn  split  is  non-zero. 
LWL682  is  the  loop  version  of  WL682. 

4.7.21.2  Synopsis. 


1.  IF   LEFT(J.ART)    is    0,    15,    7,    11,    13,      14,      3,      6,      9     or     12,      no 
additional  constraints  need   to  be  set  up,   so  WL682  exits. 

2.  Otherwise,    COUNT  is   incremented,   the     new     constraint     is     given 
index   11*N(ART)  -   10  +  COUNT  +  CSTART(ART)   and   sign  0. 

3.  The  right  hand   side  of  the     constraint,     B(COUNT),     is     assigned 
according  to   the  value  of  LEFT  (J,  ART). 

4.7.21.3  Subroutine  linkage. 

Called  by:     WL68 
Calls:     None. 
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4.7.21.4  Local  Variables. 
None. 

4.7.21.5  Outside  Variables. 

Altered:      from  WL68  —  COUNT,    I,    S,    B 
Used:      from  WL68  —  J 

from  LLINP6  —  ART 
from  MATGNL  —  CSTART 
from  MAXBAND   —  N,    LEFT 


4.7.22     Subroutine  LWL683. 


4.7.22.1  Purpose. 

Writes  LINP  card  6  for  the  left  turn  choice  constraints  of  a 
intersection  (8)  when  only  the  inbound  left  turn  split  is  non-zero. 
LWL683  is  the  loop  version  of  WL683. 

4.7.22.2  Synopsis. 


1.  IF  LEFT(J.ART)  is  0,  15,  7,  11,  13,  14,   3,   5,   10  or  12,   no 
additional  constraints  need  to  be  set  up,  so  LWL683  exits. 

2.  Otherwise,  COUNT  is  incremented,  the  new  constraint  is  given 
index  11*N(ART)  -  10  +  COUNT  +  CSTART  (ART)  and  sign  0. 

3.  The  right  hand  side  of  the  constraint,   B(COUNT),   is  assigned 
according  to  the  value  of  LEFT(J.ART). 

4.7.22.3  Subroutine  linkage. 

Called  by:     LWL68 
Calls:      None. 

4.7.22.4  Local  Variables. 
None. 

4.7.22.5  Outside  Variables. 

Altered:      from  LWL68  —  COUNT,    I,    S,    B 
Used:     from  LWL68  —  J 

from  LLINP  —  ART 
from   MATGNL   —  CSTART 
from  MAXBAND   —  N,    LEFT 
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4.7.23     Subroutine  WL69 . 

4.7.23.1  Purpose. 

Writes  LINP  card  6  for  the  loop  constraint   (9). 

4.7.23.2  Synopsis. 

The  loop  constraint  is  given  index  CSTART(4)  +  1,   and   sign  =. 
right  hand  side  is  initially  set  to  0,  and  built  up  artery  by  artery. 

The  right  hand  side  is 


The 


r 


repeated 

for 
art =1,2,3 


rinter(l,art),art  "   inter(2,art) ,art 


C-   t 


-  .  .  .  -  T 


inter(l,art)+l,art         'lnter(2,art) ,art 
if  inter(l,art)  <_  inter(2,art) 


^_ 


L    inter(2,art)+l,art   "•  +  T inter (1, art)  ,art 


if  inter(l,art)  >_  inter(2,art) 


+  5 


where  inter  is  the  loop  geometry  variable  INTER  described  in  the  MAXBAND 
main  program  section.  5  is  added  to  the  right  hand  side  to  allow  the  loop 
variable  to  take  negative  values. 

This  formulation  is  explained  more  fully  in  appendix  A. 

4.7.23.3  Subroutine  linkage. 

Called  by:  LLINP6 
Calls:  None. 

4.7.23.4  Local  Variables. 
LINP  card  6  fields: 


Integer: 
1(1) 
S(1) 

Real: 
B(1) 


Index  of  loop  constraint. 
Sign  of  loop  constraint. 


Right  hand  side  of  loop  constraint. 
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Other  local  variables: 

Integer: 

ART  Number  of  current  artery. 

MIN  The  smaller  of  the  two   intersection  numbers  at  artery 

meetings  on  ART. 
MAX  The  larger  of  the  two   intersection  numbers  at     artery 

meetings  on  ART. 
INTER1  INTERCI.ART) 

INTER2  INTER (2, ART) 

LIMIT1  Lower  limit  of  TAU's  in   formulation  —   =  MIN   +  1. 

LIMIT2  Upper  limit  of  TAU's   in   formulation  —   =  MAX. 

J  Iteration  limit. 

SIGN  Sign  of  TAU's   in   formulation. 

4.7.23.5  Outside  Variables. 

Altered:  None. 

Used:  from  MATGNL  —  CSTART 

from  MAXBAND  —  INTER,  R,  LBAR,  TAU 


4.7.24  Subroutine  LLINP8. 

4.7.24.  1  Purpose. 

Writes  LINP  card  8,  which  contains  the  left  hand  sides  —  the  decision 
variables  and  their  coefficients  —  of  the  constraints.  LLINP8  is  the 
loop  version  of  LINP8. 

4.7.24.2  Synopsis. 

After  LLINP6  has  generatated  the  signs  and  right  hand  sides  of  the 
constraints,  LLINP8  generates  the  left  hand  sides.  These  contain  the 
decision  variables  and  their  coefficients.  The  information  is  presented 
to  MPCODE  in  LINP  card  8  card  images. 

Steps: 


1.  LINP8  calls  LWL82  and  LWL83  to  generate  the  left  hand  sides  of 
the  bandwidth  and  cycle  constraints  (2A,2B,3). 

2.  For  each  artery,  LLINP8  calls  LWL4A  to  LWL88  to  generate  the 
left  hand  sides  of  constraint  sets  4A  to  8.  If  an  artery  has 
only  2  intersections,  constraint  sets  7A  and  7B  are  omitted. 

3.  LLINP8  calls  LWL89  to  generate  the  left  hand  side  of  the  loop 
constraint  (9). 
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4.7.24.3  Subroutine  linkage. 

Called  by:     MATGNL 

Calls:      LWL82,      LWL83,      LWL84A,      LWL84B,      LWL85,      LWL86A,        LWL86B, 
LWL87A,    LWL87B,    LWL88,   WL89 

4.7.24.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

4.7.24.5  Outside  Variables. 

Altered:   None. 

Used:   from  MATGNL  —  DELTAC,  CSTART,  VSTART,  KCOUNT 

from  MAXBAND  —  N,  LEFT,  K,  R,  L,  LBAR,  D,  DBAR,  E,  EBAR,   F, 
FBAR,  IG,  IGBAR,  IH,  IHBAR,  INTER 


4.7.25  Subroutine  LWL82 . 

4.7.25.1  Purpose. 

Writes  LINP  card  8  —  the  left  hand  sides  of  the  constraints  —  for  the 
bandwidth  equation  (2).   LWL82  is  the  loop  version  of  WL82. 

4.7.25.2  Synopsis. 

1.      The  expressions 

-K(1)*B(1)  +  B(2) 

-K(2)*B(3)  +  B(4) 

-K(3)*B(5)  +  B(6) 


are  set  up  as  the  left  hand   sides  of  constraint   1,    2,   and  3,   the 
bandwidth  constraints. 

2.  COUNT  is  the  number  of  cross-artery  bandwidth  equations  (2B) 
which  have  been  set  up.  If  k(4)  >  0,  COUNT  is  incremented  and 
constraint   3  +  COUNT  is  given  left  hand   side 

-K(4)*B(1)   +  B(3) 

If  K(5)  >  0,  COUNT  is  incremented  and  constraint  3  +  COUNT  is 
given  left  hand  side 

-K(5)*B(1)  +  B(5) 
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If  K(6)  >  0,   COUNT  is  incremented  and  constraint  3  +  COUNT  is 
given  left  hand  side 

-K(6)*B(3)  +  B(5) 


4.7.25.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:  None. 

4.7.25.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)         Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

ART  Number  of  current  artery. 

L  Iteration  variable. 

COUNT  Number  of  cross-artery  bandwidth  constraints     already 

set  up. 

4.7.25.5  Outside  Variables. 

Altered:     None. 

Used:     from  MAXBAND  —  K 


4.7.26     Subroutine  LWL83. 

4.7.26.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
■ —  for  the  cycle  constraints  (3).  LWL83  is  the  loop  version  of  WL83. 

4.7.26.2  Synopsis. 

The  left  hand   side  of  the  cycle     constraints     (indices     4  +  KCOUNT     and 
3  +  KCOUNT)   are  set  up  as 
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4.7.26.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:  None. 

4.7.26.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

JO )  Indices  of  decision  variables. 

Real: 

A(1)         Coefficients  of  decision  variables, 

4.7.26.5  Outside  Variables. 

Altered:      None. 

Used:      from  MATGNL  —  KCOUNT 


4.7.27     Subroutine  LWL84A . 

4.7.27.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  outbound  bandwidth  in  green  period  constraints  (4A).  LWL84A  is 
the  loop  version  of  WL84A. 

4.7.27.2  Synopsis. 

There  are  N(ART)  constraints,  with  indices  4  +  CSTART(ART)  through 
N(ART)   +  3   +  CSTART(ART).      The  Kth  constraint  has  left  hand   side 

W(K.ART)  +  B(2*ART-1  ) 

where     W(K,ART)      has      index     3   +K   +  VSTART(ART)      and   B(2«ART-1  )   has   index 
2*ART   -  1. 

4.7.27.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:   None. 
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4.7.27.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)         Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

4.7.27.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP8  —  ART 

from  MATGNL  —  CSTART,  VSTART 
Used:   from  MAXBAND  —  N 


4.7.28  Subroutine  LWL84B. 

4.7.28.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  inbound  bandwidth  in  green  period  constraints  (4B) .   LWL84B  is 
the  loop  version  of  WL84B. 

4.7.28.2  Synopsis. 

There  are  N(ART)   constraints,  with  indices  N(ART)  +  4  +  CSTART (ART) 
through  2*N(ART)  +  3  +  CSTART  (ART).   The  Kth  constraint  has  left  hand  side 

WBAR(K.ART)  +  B(2*ART) 

where     WBAR(K.ART)    has   index   N(ART)   +  3   +  K   +  VSTART(ART)   and   B(2*ART)   has 
index  2*ART. 

4.7.28.3  Subroutine  linkage. 

Called  by:      LLINP8 
Calls:      None. 
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4.7.28.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

4.7.28.5  Outside  Variables. 

Altered:   None. 

Used:  from  LLINP8  —  ART 

from  MATGNL  —  CSTART,  VSTART 
Used:   from  MAXBAND  —  N 


4.7.29  Subroutine  LWL85 . 

4.7.29.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  integer  constraints  (5).  LWL85  is  the  loop  version  of  WL85. 

4.7.29.2  Synopsis. 

There  are  N(ART)  -  1  of  these  constraints  for  each  artery  ART,  with 
indices  2*N(ART)  +  4  +  CSTART  (ART)  through  3*N(ART)  +  2  +  CSTART  (ART). 
The  left  hand   side  of  constraint  K  is 

(W(I,ART)   +  WBAR(I.ART))   -    (W(I+1,ART)   +  WBAR  (1+1  ,  ART))         (A) 

+    (T(I,ART)   +  TBAR(I.ART))   -  M(I.ART) 
+  DEL(I,ART)*L(I,ART)   -  DELBARQ  ,  ART)*LBAR  (I ,  ART)  (B) 

-  DEL(I+1,ART)*L(I+1,ART)   +  DELBAR(I+1 ,  ART)*LBAR  (1+1  ,  ART) 

Part  (A)  of  the  expression  is  always  setup.  Only  the  terms  of  part  (B)  in 
which  L  or  LBAR  is  non-zero  are  set  up.  DELCNT  counts  the  number  of  DEL's 
which  have  been  set  up,  and  DLBCNT  the  number  of  DELBAR's.  The  DEL's  are 
given  indices 

5*N(ART)   +  1    +  VSTART  (ART) 

through 
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5*N(ART)   +  DELTAC   +  VSTART(ART) 
and   the  DELBAR's 

5*N(ART)   +  DELTAC   +  1    +  VSTART(ART) 
through 

5*N(ART)  ,+  DELTAC  +  DELTBC   +  VSTART(ART). 

4.7.29.3  Subroutine  linkage. 

Called  by:  LLINP8 
Calls:  None. 

4.7.29.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(7)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

DELCNT  Number  of  DEL's  set  up  so   far. 

DLBCNT  Number  of  DELBAR's  set  up  so   far. 

K  Number  of  current  constraint. 

KP1  K   +  1. 

M  Iteration  variable. 

LIMIT  Iteration  limit. 

COUNT  Number  of  terms  of  part  (B)  entered  so  far, 

4.7.29.5  Outside  Variables. 

Altered:  None. 

Used:  from  LLINP8  —  ART 

from  MATGNL  —  DELTAC,  CSTART,  VSTART 
from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.7.30  Subroutine  LWL86A. 
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4.7.30.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  outbound  link  speed  constraints  (6A).  LWL86A  is  the  loop 
version  of  WL86A. 

4.7.30.2  Synopsis. 

There     are        2*N(ART)   -   2        of       these        constraints,        with  indices 

3*N(-ART)  +  3  +  CSTART(ART)  through  5*N(ART)  +  CSTART(ART).  Every  two 
consecutive  constraints,  starting  with  3*N(ART)  +  3  +  CSTART(ART)  and 
3*N(ART)   +  4   +  CSTART(ART),    have  the  left  hand   sides 

(D(I,ART)/F(I,ART))*Z   -  T(I,ART) 
and 

(D(I,ART)/E(I,ART))*Z   -  T(I,ART). 

These  constraints  are  derived  from  the  compound  constraint 

(D(I,ART)/(F(I,ART))*Z  <  T(I.ART)  <  (D  (I ,  ART  )/E  (I ,  ART) )  *Z 

4.7.30.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:   None. 

4.7.30.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.7.30.5  Outside  Variables. 

Altered:      None. 

Used:     from  LLINP8  —  ART 

from   MATGNL   —  VSTART,    CSTART 
from  MAXBAND   —  N,    D,    E,    F 
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4.7.31     Subroutine  LWL86B . 

4.7.31.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  inbound  link  speed  constraints  (6B)  .   LWL86B  is  the  loop 
version  of  WL86B. 

4.7.31.2  Synopsis. 

There     are       2*N(ART)  -  2        of       these        constraints,        with  indices 

5*N(ART)  +  1  +  CSTART(ART)  through  7*N(ART)  -  2  +  CSTART(ART).  Every  two 
consecutive  constraints,  starting  with  5*N(ART)  +  1  +  CSTART(ART)  and 
5*N(ART)   +  2   +  CSTART(ART),   have  the  left  hand   sides 

(DBAR(I,ART)/FBAR(I,ART))*Z   -  T(I,ART) 
and 

(DBAR(I,ART)/EBAR(I,ART))*Z   -  T  (I,  ART). 

These  constraints  are  derived   from  the  compound   constraint 

(DBAR(I,ART)/(FBAR(I,ART))*Z   <   T(I,ART) 
<    (DBAR(I,ART)/EBAR(I,ART))*Z 


4.7.31.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:  None. 

4.7.31.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(2)  Indices  of  decision  variables. 

Real: 

A(2)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 
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4.7.31.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP8  —  ART 

from  MATGNL  —  VSTART,  CSTART 

from  MAXBAND  —  N,  DBAR,  EBAR,  FBAR 


4.7.32  Subroutine  LWL87A. 

4.7.32.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  outbound  change  in  speed  between  links  constraints  (7A). 
LWL87A  is  the  loop  version  of  WL87A. 

4.7.32.2  Synopsis. 

There     are       2*N(ART)  -   4       of       these       constraints,       with         indices 
7*N(ART)   -   1    +  CSTART  (ART)        to     9*N(ART)  -  6   +  CSTART  (ART).  Each       two 

consecutive  constraints,     starting     with     7*N(ART)  -  1    +  CSTART(ART)        and 
7*N(ART)   +  CSTART  (ART)   have  the  left  hand   sides 

(D(I,ART)*IH(I,ART))*Z 

-  (D(I,ART)/D(I+1,ART))*T(I+1,ART)  +TU.ART) 
and 

(D(I,ART)*IG(I,ART))*Z 

-  (D(I,ART)/D(I+1,ART))*T(I+1,ART)  +TU.ART) 

These  constraints  are  derived  from  the  compound  constraint 

(D(I,ART)*IH(I,ART))*Z  < 

(D(I,ART)/D(I+1,ART))*T(I+1,ART)  -  T(I,ART) 

<  (D(I,ART)*IG(I,ART))*Z 


4.7.32.3  Subroutine  linkage. 

Called  by:  LLINP8 
Calls:   None. 

4.7.32.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(3)  Indices  of  decision  variables. 

Real: 

A(3)         Coefficients  of  decision  variables. 
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Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.7.32.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP8  —  ART 

from  MATGNL  —  CSTART,  VSTART 
from  MAXBAND  —  N,  D,  IG,  IH 


4.7.33  Subroutine  LWL87B. 

4.7.33.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  inbound  change  in  speed  between  links  constraints  (7B)  .  LWL87B 
is  the  loop  version  of  WL87B. 

4. 7. 33.2  Synopsis. 

There  are  2*N(ART)  -  4  of  these  constraints,  with  indices 
9*N(ART)  -  5  +  CSTART  (ART)  to  11*N(ART)  -  10  +  CSTART  (ART).  Each  two 
consecutive  constraints,  starting  with  9*N(ART)  -  5  +  CSTART(ART)  and 
9*N(ART)   -  4   +  CSTART  (ART)   have  the  left  hand   sides 

(DBAR  (I ,  ART )*IHBAR  (I ,  ART  ) )  *Z 

-  (DBAR  (I,  ART  ) /DBAR  (1+1,  ART  ))*TBAR  (1+1,  ART)  +  TBAR(I.ART) 
and 

(DBAR (I , ART )*IGBAR (I , ART  ) ) *Z 

-  (DBAR  (I,  ART  )  /DBAR  (1+1,  ART  ) )  *TBAR  (1+1,  ART)  +TBAR(I,ART) 

These  constraints  are  derived  from  the  compound  constraint 

(DBAR  (I ,  ART  )*IHBAR  (I ,  ART  ) )  *Z  <_ 
(DBAR  (I,  ART  ) /DBAR  (1+1,  ART  ))*TBAR  (1+1,  ART)  -  TBAR(I.ART) 
<  (DBAR(I,ART)*IGBAR(I,ART))*Z 


4.7.33.3  Subroutine  linkage. 

Called  by:   LLINP8 
Calls:   None. 
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4.7.33.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J(3)         Indices  of  decision  variables. 

Real: 

A(3)         Coefficients  of  decision  variables. 

Other  local  variables: 

Integer: 

K  Number  of  current  constraint. 

L  Iteration  variable. 

LIMIT  Iteration  limit. 

4.7.33.5  Outside  Variables. 

Altered:  None. 

Used:   from  LLINP8  —  ART 

from  MATGNL  —  CSTART,  VSTART 

from  MAXBAND  —  N,  DBAR,  IGBAR,  IHBAR 


4.7.34  Subroutine  LWL88. 

4.7.34.  1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  the  left  turn  choice  constraints  (8).  LWL88  is  the  loop  version  of 
WL88. 

4.7.34.2  Synopsis. 

There  are  CNCNT(ART)  of  these  contraints  for  each  artery  ART;  there 
can       be     up     to     2*N(ART)        of       them.  They  have  indices 

11*N(ART)   -   9   +  CSTART  (ART)    to      11*N(ART)   -   10   +  CNCNT(ART)   +   CSTART  (ART). 

For  each  intersection  K,  LWL88  calls  WL881  to  write  the  LINP  card  8 
images  if  both  left  splits  are  non-zero.  LWL88  calls  WL882  or  WL883  if 
only  the  outbound  or  inbound  left  splits,  respectively,  are  non-zero.  If 
both  splits  are  zero,   there  are  no  constraints  to  be  set  up. 

DELCNT  and  DLBCNT  are  the  numbers  of  the  next  DEL  and  DELBAR  to  be 
used,  and  COUNT  is  the  number  of  set  8  constraints  set  up  so  far.  DELCNT 
and   DLBCNT  are  incremented   as  required   at  each  intersection. 
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4.7.34.3  Subroutine  linkage. 

Called  by:   LLINP8 

Calls:  LWL881,  WL882,  WL883 

4.7.3^.4  Local  Variables. 

Integer: 

COUNT  Number  of  set  8  constraints  set  up  so  far 

DELCNT  Number  of  next  DEL  to  be  set  up. 

DLBCNT  Number  of  next  DELBAR  to  be  set  up. 

K  Number  of  current  intersection. 

4.7.34.5  Outside  Variables. 

Altered:  None. 

Used:  from  LLINP8  —  ART 

from  MATGNL  —  DELTAC,  CSTART,  VSTART 
from  MAXBAND  —  N,  LEFT,  L,  LBAR 


4.7.35  Subroutine  LWL881 . 

4.7.35.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  the  left  turn  choice  constraints  (8)  when  both  left  splits  are 
non-zero.  LWL881  is  the  loop  version  of  WL881 . 

4.7.35.2  Synopsis. 


1.  If  LEFT(K.ART)  is  0  or  15,  no  constraint  is  neeeded,  and  LWL881 
exits. 

2.  If  LEFT(K.ART)  is  7,  11,  13,  14,  3  or  LEFT(K.ART)  is  12  and 
L(K,ART)  not  =  LBAR(K,ART),  only  one  constraint  is  needed. 
COUNT  is  incremented  and  the  constraint  is  given  index 
1 1  *N   -  10  +  COUNT.      The  left  hand   sides  are 

LEFT (K, ART)  left  hand  side 

7,11,3  DEL(K.ART)  +  DELBAR  (K,  ART) 

13  -DEL(K,ART)   +   DELBAR  (K  ,  ART  ) 

14,12  DEL(K.ART)   -  DELBAR  (K  ,  ART  ) 


3.      If   LEFT(K)    is   5,    10,    6  or  9,    one  constraint  is  needed.      COUNT  is 
incremented        and  the  constraint  is  given  index 

11*N(ART)  -  10   +  COUNT  +  CSTART(ART).        The  left  hand   sides  are: 
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LEFT (K, ART)  left  hand  side 

5,10  DEL(K.ART) 

6,    9  DELBAR(K.ART) 


4.  If  LEFT(K.ART)  is  12  and  L(K,ART)  =  LBAR(K.ART),  or  LEFT(K.ART) 
is  1,  2,  4  or  8,  two  constraints  are  needed.  The  constraints 
are  given  the  next  two  free  indices  (11*N(ART)  -  10  +  initial 
value  of  COUNT  +  1  +  CSTART(ART),  11*N(ART)  -  10  +  initial  value 
of  COUNT  +  2  +  CSTART(ART))  and  COUNT  is  incremented  by  2.  The 
left  hand  side  of  the  first  constraint  is  DEL(K.ART),  and  the 
left  hand   side  of  the   second   constraint  is  DELBAROC,  ART) . 

4.7.35.3  Subroutine  linkage. 

Called  by:  LWL88 
Calls:  None. 

4.7.35.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

1(2)         Indices  of  constraints. 

J(2,2)  Indices  of  decision  variables.  The  first  index  of  J 
is  the  variable  number  in  the  constraint,  and  the 
second  is  the  number  of  the  constraint. 

Real: 

A(2,2)  Coefficients  of  decision  variables.  Indices  are  as 
for  J. 

Other  local  variables: 

Integer: 
M  Iteration  variable. 

4.7.35.5  Outside  Variables. 

Altered:     from  LWL88  —  COUNT 

Used:      from   LWL88  —  DELCNT,    DLBCNT,    K 
from  LLINP8  —  ART 

from   MATGNA   —  DELTAC,    CSTART,    VSTART 
from  MAXBAND   —  N,    LEFT,    L,    LBAR 


4.7.36     Subroutine  LWL882 . 
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4.7.36.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
for  left  turn  choice  constraints  (8)  when  only  outbound  left  split  is 
non-zero.  LWL882  is  the  loop  version  of  WL882. 

4.7.36.2  Synopsis. 


1.  If  LEFT(K.ART)  is  0,  15,  7,  11,  13,  14,  3,  6,  9  or  12,  no 
constraint  is  needed   and  LWL882  exits. 

2.  if  LEFT(K.ART)  is  5,  10,  1,  2,  4,  or  8,  one  constraint  is 
needed.  COUNT  is  incremented,  and  the  constraint  is  given  index 
1 1  *n  -   10  +  COUNT.      The  left  hand   side  is 

DEL  (K,  ART). 


4.7.36.3  Subroutine  linkage. 

Called  by:     LWL88 
Calls:      None. 

4.7.36.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J  Index  of  decision  variable. 

Real: 

A  Coefficient  of  decision  variable. 

4.7.36.5  Outside  Variables. 

Altered:     from  LWL88  --  COUNT 

Used:      from  LWL88  --  DELCNT,    K 
from  LLINP8  —  ART 
from  MATGNL  —  CSTART,    VSTART 
from  MAXBAND   —  N,    LEFT 


4.7.37     Subroutine  LWL883- 
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4.7.37.1  Purpose. 

Writes  LINP  card  8  —  contains  the  left  hand  sides  of  the  constraints 
—  for  left  turn  choice  constraints  (8)  when  only  inbound  left  split  is 
non-zero. 

4.7.37.2  Synopsis. 


1.  If  LEFT(K.ART)  is  0,  15,  7,  11,  13,  14,  3,  5,  10  or  12,  no 
constraint  is  needed  and  LWL882  exits. 

2.  if  LEFT(K.ART)  is  6,  9,  1,  2,  4,  or  8,  one  constraint  is  needed. 
COUNT  is  incremented,  and  the  constraint  is  given  index 
11*N(ART)  -  10  +  COUNT  +  CSTART(ART).   The  left  hand  side  is 

DELBAR(K.ART). 


4.7.37.3  Subroutine  linkage. 

Called  by:     LWL88 
Calls:     None. 

4.7.37.4  Local  Variables. 

LINP  card  8  fields: 

Integer: 

I  Index  of  constraint. 

J  Index  of  decision  variable. 

Real: 

A  Coefficient  of  decision  variable. 

4.7.37.5  Outside  Variables. 

Altered:     from  LWL88  --  COUNT 

Used :      from  LWL88  —  DLBCNT,    K 

from  LLINP8  —  ART 

from  MATGNL  —  DELTAC,    CSTART,    VSTART 

from  MAXBAND   —  N,    LEFT 


4.7.38     Subroutine  WL89. 


-      160  - 


4.7.38.1  Purpose. 

Writes  LINP  card  8  for  the  loop  constraint   (9). 

4. 7. 38.2  Synopsis. 

The  loop  constraint  has  index  CSTART(4)  +  1. 
It  has  left  hand  side 


nT  (A) 


+  t 


V 


~w-     /-,         _\      +w.     ,_     x  (B) 

inter(l,art)  ,art    mter(2,art)  ,art 


inter(l,art) ,art  inter (2,art)-l,art 

if  inter(l,art)  <_  inter(2,art) 

inter(2,art) ,art  inter (1, art )-l, art 

if  inter(l,art)  >  inter (2, art) 


+  <S.     /-,     N      I.  ,-  (C) 

inter(l,art) ,art  inter (1, art ), art 

-  6"  T 

inter(2,art) ,art   inter(2,art) ,art 


+  Y    (r  -a 

art  ■  inter (2, art) , art    inter(2,art) ,art 

+  r  -  T  -   1) 

inter(l,art2),art2    inter (1 ,art2) ,art2    ' 


where  inter  is  the  loop  geometry  variable  INTER  described  in  the  MAXBAND 
main  program  section.  WL89  first  sets  up  n(L)  on  the  left  hand  side  as 
variable  VSTART(4)  +  1  (part  (A)).  It  then  calls  GIDLB  to  find  the 
indices  of  the  DELBAR  variables  which  appear  in  part  (C).  Next,  WL89 
calls  WL891  and  WL892  to  set  up  parts  (B)  and  (C)  of  the  left  hand  side 
for  each  artery.  The  remaining  part  of  the  subroutine  writes  out  the  card 
image. 

4.7.38.3  Subroutine  linkage. 

Called  by:   LLINP8 

Calls:   GIDLB,  WL891 ,  WL892 

4.7.38.4  Local  Variables. 
LINP  card  8  fields: 


Inttger : 

I 


Index   of  constraint, 
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J(66) 

Real : 
A(66) 


Indices  of  decision  variables. 


Coefficients  of  decision  variables. 
Other  local  variables: 


Integer: 

INTDLB(2,3) 


ART 
K 

GAM C NT 

L 

M 

LIMIT 

LIMIT1 

LIMIT2 


INTDLB(i.art)  has  the  index  of  variable  DELBAR(k.l) 
where  k  =  INTER(i.art)  and  1  =  art.  If  DELBAR(k.l) 
was  not  set  up  because  LBAR(k.l)  in  artery  art  is  0, 
INTDLB(i.art)  is  0. 

Number  of  current  artery. 

Number  of  variables  set  up  so  far  on  the  left  hand 
side. 

Number  of  GAMMA' s  set  up  so  far.   (Used  in  WL892). 

Iteration  variable. 

Iteration  variable. 

Iteration  limit. 

Iteration  limit. 

Iteration  limit. 


4.7.38.5  Outside  Variables. 

Altered:   None. 

Used:   from  MATGNL  —  DELTAC,  CSTART,  VSTART 
from  MAXBAND  —  N,  INTER,  R,  LBAR 


4.7.39  Subroutine  GIDLB. 

4.7.39.1  Purpose. 

Finds  the   indices  of  DELBAR's  used    in  the  loop  constraint. 

4.7.39.2  Synopsis. 

For  each  artery  ART,  each  LBAR  is  examined.  If  the  LBAR  is  LBAR (k, ART) 
or  LBAR(m.ART),  where  k  =  INTERO.ART)  and  1  =  INTER(2,  ART) ,  INTDLBO  ,  ART) 
or  INTDLB(2, ART)  is  set  to  the  index  of  the  LBAR.  If  the  particular  LBAR 
is   0,   the  corresponding  element  of  INTDLB  is  set  to  0. 

4.7.39.3  Subroutine  linkage. 

Called  by:     WL89 
Calls:      None. 
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4.7.39.4  Local  Variables. 

Integer: 

DLBCNT  Number  of  declared   DELBAR's     found      so      far     for     the 

current  artery. 
ART  Number  of  the  current  artery. 

I  Number  of  the  current  intersection. 

4.7.39.5  Outside  Variables. 

Altered:      from  WL89  —  INTDLB 

Used:      from  MATGNL  —  VSTART,    DELTAC 
from  MAXBAND   —  N,    INTER,    LBAR 


4.7.40     Subroutine  WL891 . 

4.7.40.1  Purpose. 

Prepares  LINP  card  8  for  part  (B)    of  the  loop  constraint  (9). 

4.7.40.2  Synopsis. 

Part  (B)  of  the  cycle  constraint  is  set  up,  where  for  each  artery  ART, 

W(K.ART)   has  index  3  +K  +  VSTART (ART) 
and 

T(K,ART)  has  index  2*N(ART)  +  3  +  K  +  VSTART  (ART) 

4.7.40.3  Subroutine  linkage. 

Called  by:     WL89 
Calls:      None. 

4.7.40.4  Local  Variables. 

Integer: 

MIN  Smallest  intersection  number  at  an  artery  meeting  for 

this  artery. 
MAX         Largest  intersection  number  at  an  artery  meeting  for 

this  artery. 
LIMIT1       Lower  limit  on  T's  in  constraint  —  =  MIN 
LIMIT2       Upper  limit  on  T's  in  constraint  —  =  MAX  -  1 
L  Iteration  variable  —  position  of  T  variable  in 

tsequence. 
SIGN         Sign  of  T's  in  constraint. 
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4.7.40.5  Outside  Variables. 

Altered:  from  WL89  —  J,  K,  A 

Used:   from  WL89  —  ART 

from  MATGNL  —  VSTART 

from  MAXBAND  —  N,  INTER 


4.7.41  Subroutine  WL892 


4.7.41.  1  Purpose. 

Prepares  LINP  card   8   for   part   (C)    of  the  loop  constraint   (9). 

4.7.41.2  Synopsis. 

WL892  sets  up  the  DELBAR  and  GAMMA  variables  in  part  (C)  of  the  loop 
constraint. 

The  DELBAR's  are  entered  if  they  are  from  a  intersection  at  an  artery 
meeting,  and  if  the  LBAR's  at  those  intersections  are  non-zero.  If  the 
LBAR  is  0,  the  DELBAR  variable  will  not  have  been  formally  entered  into 
the   formulation   (because   it  would   then  have  a   zero  coefficient). 

The  GAMMA's  are  also  entered  only  if  they  have  a  non-zero  coefficient. 
This  is  ascertained  by  calculating  the  all-red  period  length  at  an  artery 
meeting   in  ALLRED. 

4.7.41.3  Subroutine  linkage. 

Called  by:     WL892 
Calls:      None. 

4.7.41.4  Local  Variables. 

Integer: 

INTER1  A  intersection  number  at  an  artery  meeting. 

INTER2  A  intersection  number  at  an  artery  meeting. 

ART2  Number  of  second  artery  —  (ART1  +  1)  mod  3 

4.7.41.5  Outside  Variables. 

Altered:   from  WL89  —  GAMCNT,  J,  K,  A 
Used:   from  WL89  —  INTDLB,  ART 
from  MATGNL  —  VSTART 
from  MAXBAND  —  INTER,  R,  LBAR 
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4.7.42  Subroutine  LNINES. 


4.7.42.  1  Purpose. 


Writes  BB  card  3   and   LINP  cards   3,    5,    7     and     9.        This     subroutine     is 
identical   to   NINES. 

4.7.42.2  Synopsis. 


These  cards  are  delimiters  of  the  various  sections  of  the  input  file. 
LNINES  writes  a  card  image  with  all  9 's  in  its  first  10  columns  and  the 
remaining  columns  blank. 

4.7.42.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:     None. 

4.7.42.4  Local  Variables. 
None. 

4.7.42.5  Outside  Variables. 

Altered:  None. 
Used:  None. 


4.7.43  Subroutine  LMORE . 

4.7.43.  1  Purpose. 

Writes  card  telling  MPCODE  there  are  no  further  runs.   This  subroutine 
is  identical  to  MORE. 

4.7.43.2  Synopsis. 

The  card  image  written  has  a  0  in  column  10,  with  the  rest  of  the  card 
blank. 

4.7.43.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:      None. 
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4.7.43.4  Local  Variables. 


4.7.43.5  Outside  Variables, 

Altered:   None. 
Used:   None. 


4.7.44  Subroutine  LEOF . 

4.7.44.1  Purpose. 

Closes  the  MPCODE   input  file.      LEOF  is  identical  to  EOF. 

4.7.44.2  Synopsis. 

Issues  an  ENDFILE   command  on  unit    11,    the  MPCODE   input   file, 

4.7.44.3  Subroutine  linkage. 

Called  by:     MATGNL 
Calls:     None. 

4.7.44.4  Local  Variables. 
None. 

4.7.44.5  Outside  Variables. 

Altered:      None. 
Used:      None. 
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CHAPTER   5 
THE  M PC ODE   MODULE 


This  module  contains  the  MPCODE  mathematical  programming  system 
developed  by  A.  Land  and  S.  Powell.  This  system  is  fully  documented  in 
Land   and   Powell   [19731. 

In  general,   the  system   has  been  changed   as  little  as  possible  as   it  has 

been  modified   for  use   in  MAXBAND.  This  chapter  explains     general      changes 

which     have     been     made,      followed  by     changes     and   additions  to   specific 
subroutines. 


5. 1      Input   and  Output. 

MPCODE  reads  its  input  file  on  FORTRAN  file  11.  It  may  punch  a  restart 
node  on  file  7,  which  can  be  read  in  on  file  8  when  the  job  is  restarted. 
MPCODE  produces  its  own  output  on  file  12.  This  file  may  be  dummied  if 
not  required. 


5.2     MAXBAND  Variables   in  MPCODE. 

The  MAXBAND  variables  STATUS,  BBITR,  BBINV,  MLPITR,  MLPINV,  NOSOL, 
BESOBJ  and  0UTVAR(142)  are  used  to  transfer  the  solution  from  MPCODE  to 
OUTPUT.  They  are  declared  and  used  in  subroutines  MPCODE,  BB,  BACKUP, 
BBDATA,  ISTAIL,  PNODE  and  RESTRT.  They  are  explained  in  the  'Local 
Variables'    section  of  the  MAXBAND  subroutine  description. 


5. 3     General  Changes. 

The   following  general   changes  have  been  made  to  MPCODE: 


1.      The  subroutines  which  are  not  used   for  mixed    integer  programming 
were  removed  or  modified. 
The   subroutines  removed   were: 

DOAQP,    PRICE,    PURGE,    QCON,    QPDAT,    IFDATA,       INTCON,       CHAGY, 
CHXSL,    MIDBI,    MIDCJ,    PARAB,    PARAC,    PDATA,    PPRINT. 

The        following     subroutines     had      all     statements     removed     but 
'RETURN'    and    'END': 

QP,    MIF,    PLP 
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2.  The  code  was  made  double  precision  by 

A.  Adding   the  statement 

IMPLICIT   REAL*8    (A-H.O-Z) 

to  all   subroutines. 

B.  Changing    'REAL  INV    to    '    REAL*8   INV. 

C.  Replacing   the   function   'ABS'    by  the      function      'DABS'. 

D.  Replacing    'FUNCTION     A(I,J)»        with        'REAL       FUNCTION 
A*8(I,J)' 

E.  Making   the  arrays   FMT1,    FMT2,    FMT3,    SI,    COL,    COLUMN  in 
SPRINT  INTEGER*4. 

3.  Program  dimensions  were  changed  to  allow  problems  of  up  to 
20  intersections.  The  changes  made  were  those  described 
in  chapter  7   of  Land   and   Powell. 


Maximum  number  of  variables 
Maximum  number  of  constraints 
Maximum  number  of  non-zero 

elements  in  A  matrix 
Maximum  number  of 

active  constratints 
Maximum  number  of  discrete 

(integer)    variables 

These  dimensions  made  it  mecessary  to  reverse  the  order  of 
XR  and  YBASIS  in  the  blank  common,  and  of  IROW  and  MAXA  in 
COMMON/AREF/.  In  addition,  the  four  byte  dummy  integer 
IDUM1  was  placed  between  NUMD  and  PREOBJ  in  COMMON /BBB/  so 
that  the  REAL*8  variables  will  line  up  with  8  byte 
boundaries. 

4.  The  tolerances  were  changed  to  the  values  suggested  for 
use  with  64  bit  words  in  chapter  7  of  Land  and  Powell 
[19733. 

5.  The  input  data  set  was  changed  from  unit  5  to  unit  11,  and 
the  output  data  set  from  unit  6  to  unit  12.  PNODE 
continues  to  punch  on  unit  7;  RESTRT  continues  to  read  on 
unit  8. 

6.  Two  changes  were  made  to  the  subroutine  CHBSIS  to 
eliminate  a  looping  problem.      The  line 


NOW 

PREVIOUSLY 

140 

50 

250 

25 

1250 

1000 

140 

25 

60 

30 
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IF    (R.EQ.0. 0)  GO  TO   40 

on  top  of  page  57  of  Land   and  Powell,  was  removed. 
Line    120 

120     IF  (R.EQ.0.0  .OR.  XOFNEG.  LT.  0. 0  .AND. 

NEWY.NE.NEGINV)  GO  TO    130 

on  page  58  of  Land   and   Powell,  was  changed   to 

120   IF    (XOFNEG.  LT.  0.0   .AND.      NEWY.NE.NEGINV)  GO  TO    130. 


5. 4     Changes  and  Additions  to  Specific  Subroutines. 

This  section  explains  the  changes  and   additions  which     were     made 

to   specfic  subroutines.  To  make  these  changes  and   additions  readily 

apparent     in     the     code,  changed  or  added   lines  are  preceded  by  the 
statement 

C  *****  MAXBAND   *****       <comment> 

and   followed  by  the  statement 

C  *****   MAXBAND    ***** 

where  <comment>  is  a  short  description  of  the  change  or  addition. 

The  line  numbers  given  below  begin  with  the  first  line  of  the 
MPCODE  module.   This  is  the  first  line  of  subroutine  MPCODE. 


5.4.1  Subroutine  MPCODE. 

lines  changes  or  additions 

1.  3-4  Called   with  MAXBAND  variables. 

2.  179-182  MAXBAND  variable  declarations. 

3.  235-236  BB  called  with  MAXBAND  variables. 


5.4.2     Subroutine  DATA. 

lines  changes  or  additions 

1.  685  Input   field   size   is  changed   from  F6. 0  to     F12.0. 

2.  691-692  Echo    statement     is     changed      to     reflect     larger 

input  field  size. 

3.  760  Number  of  input   field   sets  per  card      is     changed 
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from  8  to  5  to  allow  the  greater  field  size 

4.  769  Same  as  3. 

5.  784  Same  as  3. 

6.  798  Same  as  3. 

7.  81  1  Same  as  3. 

8.  851  Same  as  3. 


5.4.3     Subroutine  BB . 

lines  changes  or  additions 

1.  1673-1674  MAXBAND  variables  added   to   subroutine  statement. 

2.  1677,1680-1681  MAXBAND  variable  declarations  added. 

3.  1704-1713  MAXBAND  variables  initialized   to  0. 

4.  1719-1720  MAXBAND     variables       added        to        CALL         BBDATA 

statement. 

5.  1732-1737  Sets   BBITR  and      BBINV,      and      resets     MLPITR     and 

MLPINV     if     necessary,   after  solving  the  latest 
linear  program. 

6.  1750-1754  Saves  the     solution     of     the       original        linear 

program  problem,   in  case  this  solution  is  found 
to  be  discrete. 

7.  1766-1767  If  a   restart  node  is  to  be  punched,   the     MAXBAND 

variables     are     passed      to     PNODE   so   that  their 
current  values  can  be  included   in  the  node. 

8.  1772  Sets  STATUS   =  1 9  to   indicate     that     a     node     has 

been   punched. 

9.  1790  Sets   STATUS  to      indicate     how     the     program     has 

failed . 


5.4.4  Subroutine  BACKUP. 

lines  changes  or  additions 

1.  1796-1797  MAXBAND  variables     are       added        to       subroutine 

statement. 

2.  1800,1803-1804     MAXBAND  variables  declarations  added. 

3.  1893-1896  N0S0L  is  set  to  the  number  of  integer     solutions 

found.  STATUS  is  set  to  1  if  at  least  one 
solution  was  found;  otherwise,  it  is  set  to 
13. 


5.4.5     Subroutine  BBDATA. 

lines  changes  or  additions 

1.      1930-1931  MAXBAND  variables  added   to   subroutine  statement. 
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2.  1934,1937-1938     MAXBAND  variable  declarations  added. 

3.  2028-2029  MAXBAND     variables       added        to        CALL         RESTRT 

statement.      The  values  of  the  variables  will  be 
read   from  the  restart  node. 


5.4.6     Subroutine  ISTAIL . 

lines  changes  or  additions 

1.  2256-2257  MAXBAND  variables  added   to   subroutine  statement. 

2.  2260,2263-2264     MAXBAND  variable  declarations  added. 

3.  2367-2368  When  a  new     integer     solution     has     been     found, 

updates  NOSOL  and   BESOBJ. 

4.  2375-2380  If  the  BB  iteration     or     reinversion     limit     has 

been  exceed,  set  STATUS  to  indicate  which  has 
been  exceeded. 

5.  2396-2400  If  the  new  integer   solution     is     an     imptovement 

over  the  last,    it   is  stored    in  OUTVAR. 

6.  2430-2431  If  the       original        LP       solves       the       discrete 

constraints,  i.e.,  is  an  integer  solution,  set 
NOSOL  =  1  and  STATUS  =  1  to  indicate  an  optimal 
solution. 

7.  2440-2441  If  the  original   LP  is     infeasible     even     without 

the  discrete  constraints,  set  NOSOL  =  0  and 
STATUS    =11. 


5.4.7     Subroutine  PNODE . 

lines  changes  or  additions 

1.  2446-2447  MAXBAND  variables  added   to   subroutine  statement. 

2.  2450,2453-2456     MAXBAND  variable  declarations     added,      including 

count  variable  I. 

3.  2474-2477  The  field  types  have  been  changed   and  the     field 

sizes  have  been  increased   for  greater  accuracy. 

4.  2521-2526  The  current  values  of  the  MAXBAND  variables     are 

saved   in  the  node. 


5.4.8     Subroutine  RESTRT. 

lines  changes  or  additions 

1.  2531-2532  MAXBAND  variables  added   to   subroutine  statement. 

2.  2535,2538-2541     MAXBAND  variable  declarations     added,      including 

count  variable  I. 

3.  2559-2562  The  field  types  have  been  changed   and   the     field 

sizes  increased  for  greater  accuracy. 
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4.      2587-2592  The  current  values  of  the  MAXBAND  variables     are 

read    from  the  restart  node. 
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CHAPTER  6 
THE  OUTPUT  MODULE 


The  OUTPUT  module  indicates  whether  a  problem  solution  has  been 
found,  and  prints  the  MPCODE  statistics.  If  a  solution  has  been 
found,  OUTPUT  converts  the  solution  into  the  output  form  and  prints 
the  solution  report.  The  stucture  of  the  OUTPUT  module  is  shown  in 
figure  5. 


6.  1   Input  and  Output. 

The  OUTPUT  module  writes  to  FORTRAN  file  6. 

6.2  OUTPUT  Control  Subroutines. 
6.2.1   Subroutine  OUTPUT. 
6.  2.  1.  1  Purpose  . 

Controls  the  operation  of  the  output  module. 
6.2. 1. 2  Synopsis. 


1.  If  STATUS  =  1,  there  is  an  optimal  solution.  MPSTAT  prints  the 
MPCODE  statistics.  GDOUT  obtains  the  MPCODE  solution  and 
generates  and  prints  the  solution  report. 

2.  If  STATUS  not  =  1,  MPCODE  has  not  found  an  optimal  solution. 
BADOUT  prints  an  explanation  of  the  error  in  the  problem.  If  no 
solution  has  been  found  (NOSOL  =  0)  an  appropriate  message  is 
printed  and  MPSTAT  is  called.  If  NOSOL  not  =  0,  the  same  steps 
occur,  after  which  GDOUT  is  called  to  produce  the  soltuion 
report. 

6.2.1.3  Subroutine  linkage. 

Called   by:     MAXBAND 

Calls:      MPSTAT,    GDOUT,    BADOUT 

6.2.1.4  Local  Variables. 
None. 
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MP STAT 


OUTPUT 


BADOUT 


GETVAR 


SETVAR 


MPCODE  Completion  Status 
&  error  report 


MPCODE  Statistics 


Solution  Report 


REPORT 


File  6 

MAXBAND  OUTPUT 


Data  Flow 


Figure   5:   The  OUTPUT  module. 


Control 
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6.2.1.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  LOOP,  N,  METRIC,  INTER,  SEQNO,  STATUS,  BBITR, 

BBINV,  MLPITR,  MLPINV,  NOSOL,  R,  RBAR,  L, 
LBAR,  D,  DBAR,  TAU,  TAUBAR,  BESOBJ,  OUTVAR, 
LNAME,  ANAME,  NODENO,  INAME,  ORIENT 


6.2.2  Subroutine  BADOUT. 

6.2.2.1  Purpose. 

Prints  message  explaining  error  when  MPCODE  does  not  find  an  optimal 
solution. 

6.2.2.2  Synopsis. 

BADOUT  prints  a  message  determined  by  the  value  of  STATUS.   The  values 
of  STATUS  and  their  meanings  are  explained  under  subroutine  MAXBAND. 

6.2.2.3  Subroutine  linkage. 

Called  by:   OUTPUT 
Calls:  None. 

6.2.2.4  Local  Variables. 
None. 

6.2.2.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  STATUS 


6.2.3  Subroutine  MP STAT . 

6.2.3.1  Purpose. 

Writes  the  MPCODE  operating  statistics  section  of  output. 

6.2.3.2  Synopsis. 
MPSTAT  writes 

1.  The  number  of  branch  and  bound  iteration  performed  (BBITR); 

2.  The  number  of  branch  and  bound  reinversion  performed  (BBINV); 
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3.  The  maximum  number  of  linear  program  iterations   performed 
(MLPITR); 

4.  The  maximum  number  of  linerar  program  reinversons  performed 
(MLPINV); 

5.  The  number  of  solutions  found  so  far  (NOSOL); 

6.  The  value  of  the  objective  function  at  the  last  (and  best) 
solution  (BESOBJ). 

6.2.3.3  Subroutine  linkage. 

Called  by:  OUTPUT 
Calls:   None. 

6.2.3.4  Local  Variables. 
None. 

6.2.3.5  Outside  Variables. 

Altered:  None. 

Used:   from  MAXBAND  —  BBITR,  BBINV,  MLPINR,  MLPINV,  NOSOL,  BESOBJ 


6.2.4  Subroutine  GDOUT . 

6. 2. 4. 1  Purpose. 

Obtains  solution  from  MPCODE,  and  generates  and  prints  solution  report, 

6.2.4.2  Synopsis. 

1.  GETVAR  obtains  the  solution  from  MPCODE,   through  the  values 
stored  in  OUTVAR. 

2.  SETVAR  sets  the  values  of  the  solution  report  variables. 

3.  REPORT  prints  the  solution  report. 

6.2.4.3  Subroutine  linkage. 

Called  by:   OUTPUT 

Calls:   GETVAR,  SETVAR,  REPORT 
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6.2.4.4  Local  Variables. 

The  local  variables  used  in  the  OUTPUT  module  follow  the  dimension  and 
index  rules  explained  in  chapter  1 . 

Variables  used  in  the  MPCODE  formulation  and  copied  from  OUTVAR:  . 

Integer : 

DEL(20,3)     The  outbound  left  turn  variables. 
DELBARC20.3)  The  inbound  left  turn  variables. 

Real: 

B(2,3)        Bandwidths  (cycles). 

Z  Inverse  cycle  time  ( seconds/ cycle) . 

W(20,3)       Outbound  time  from  beginning  of  green  to  beginning  of 

bandwidth  (cycles). 
WBAR(20,3)    Inbound  time  from  end  of  bandwidth  to  end  of  green 

(cycles) . 
TO  9,  3)      Outbound  traversal  times  on  links  (cycles). 
TBAR(10,3)    Inbound  traversal  times  on  links  (cycles). 
GAMMA(3)      The  all-red  period  allocation  variables  (cycles). 

Times  at  which  outbound  periods  begin  (cycles): 

Real: 

ROFF(20,3)  Red  period. 

GOFF(20,3)  Green  period. 

LOFF(20,3)  Left  period. 

BOFF(20,3)  Bandwidth  period. 

Times  at  which  inbound  periods  begin  (cycles): 

Real: 

RB0FF(20,3)  Red  period. 

GBOFF(20,3)  Green  period. 

LBOFF(20,3)  Left  period. 

BBOFF(20,3)  Bandwidth  period. 

Times  at  which  outbound  periods  end  (cycles): 

Real: 

EROFF(20,3)  Red  period. 

EGOFF(20,3)  Green  period. 

ELOFF(20,3)  Left  period. 

EB0FF(20,3)  Bandwidth  period. 

Times  at  which  inbound  periods  end  (cycles): 

Real: 

ERBOFF(20,3)  Red  period. 

EGB0FF(20,3)  Green  period. 

ELBOFF(20,3)  Left  period. 

EBBOFF(20,3)  Bandwidth  period. 
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Phase  begin  and  end  times  (cycles): 


Real: 

MOFF(20,3) 
COFF(20,3) 
EM OFF (20, 3) 
ECOFF(20,30 


Main  street  phase  begin. 

Cross  street  core  time  begin, 

Main   street  phase  end. 

Cross  street  core  time  end. 


Begin  and   end  times  and  durations  of  periods  in  seconds; 


Real: 

BSEC(10,20,3) 


Beginning  times  of  periods. 
Value  of  BSECC  j.I.ART)  for  j  = 

1  —  Green  outbound; 

2  —  Red  outbound; 

3  —  Left  outbound; 

4  —  Bandwidth  outbound; 

5  —  Green  inbound; 

6  —  Red  inbound; 

7  —  Left  inbound; 

8  —  Bandwidth  inbound; 

9  —  Main  street  phase; 

10  —  Cross   street  core  time. 


ESECO0.20,  3)      End   times  of  periods. 

Elements  are  the  same  as   in   BSEC. 


DSEC(8,20,3) 


Durations  of  periods. 

Value   of  DSEC(  j.I.ART)    for  j   = 

1  —  Green  outbound; 

2  —  Red   outbound; 

3  —  Left  outbound; 

4  —  Green  inbound; 

5  —  Red    inbound; 

6  —  Left  inbound; 

7  —  Main  street  phase; 

8  —  Cross  street  core  time, 


BNDSEC(2,3)    Bandwidth  durations. 

Value  of  BNDSEC(i.ART)  for  i  = 

1  —  outbound; 

2  —  inbound . 

TAUSEC(2,20, 3)  Queue  clearance  (bandwidth  advance)  times, 
Value  of  TAUSEC(  j.I.ART)  for  j  = 

1  —  outbound; 

2  —  inbound . 


Time  and  speed  variables: 


Real: 
ASPD(3) 


Average  outbound  speed  on  artery  (feet/second  or 
meters/ second) . 
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ASPDBR(3)  Average  inbound  speed  on  artery. 

DT0TC3)  Total  outbound  length  of  artery  (feet  or  meters). 

DBT0TC3)  Total  inbound  length  of  artery. 

TT0T(3)  Total  outbound  traversal  time  on  artery  (seconds). 

TBT0T(3)  Total  inbound  traversal  time  on  artery. 

TIME(19,3)  Outbound  traversal  times  on  links  (seconds). 

TIMBAR(19,3)  Inbound  traversal  times  on  links. 

SPD(19,3)  Outbound   speeds    on    links    (feet/second    or 

meters/ second) . 

SPDBAR(19,3)  Inbound  speeds  on  links. 

Other  values  computed  from  MPCODE  solution: 

Integer: 

SPLAT(20,3)       The  left  turn  pattern  selected   by  MPCODE    (1,2,      3     or 
4). 

Real: 

CYCLE  Cycle  time  choosen  by  MPCODE  —  1/Z. 

G(20,3)  Outbound  green  split  (cycles). 

GBAR(20,3)  Inbound  green  split  (cycles). 

MAIN (20, 3)  Length  of  main  street  phase  (cycles). 

CROSS(20,3)  Length  of  cross  street  core  time  (cycles). 

6.2.4.5  Outside  Variables. 

Altered:   None. 

Used:   from  MAXBAND   —  LOOP,  N,   METRIC,   INTER,   SEQNO,   BESOBJ, 

OUTVAR,  R,   RBAR,   L,   LBAR,   D,  DBAR,  TAU, 

TAUBAR,  LNAME,  ANAME,  NODENO,  INAME,   ORIENT 


6. 3  Obtaining  solution  from  MPCODE. 

6.3.1   Subroutine  GETVAR . 

6.  3. 1 .  1  Purpose  . 

Obtains  the  solution  from  MPCODE  by  translating  values  from  OUTVAR  to 
solution  report  variables. 

6. 3. 1.2  Synopsis. 

MPOCDE  returns  the  array  of  solution  values  OUTVAR.  To  get  the  values 
of  specific  formulation  variables,  their  relative  positions  in  OUTVAR  have 
to   be  calculated    according   to   the  values  explained    in  appendix   A. 


1.  RDLCNT  counts  the  number  of  left  turn  variables   (DEL  and   DELBAR) 
in  each  artery. 

2.  RFSTRT  places  offsets   in  VSTART  which  are  added   to     the     indices 
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of  the  formulation  variables  in  each  artery  to  give  their 
indices  in  OUTVAR.  VSTART  has  the  same  values  here  as  the 
variable  of  the  same  name  in  submodule  MATGNL. 


3.  ASSIGN  tranfers  the  values  of  the  formulation  variables  from 
OUTVAR  to  individual  formulation  variables  and  to  the  solution 
report  variables. 

6.3.1.3  Subroutine  linkage. 

Called  by:     GDOUT 

Calls:      RDLCNT,    RFSTRT,    ASSIGN 

6.3.1.4  Local  Variables. 


Integer: 

DELTAC(3)  Number  of  DEL's   in  each  artery. 

DELTBCC3)  Number  of  DELBAR  »s   in  each  artery. 

VSTART (4)  Offsets  to  be  added   to   single  artery  indices  to     give 

loop  indices. 

All  0  for  single  artery. 

For  loop  — 

1  -  add  to  first  artery  variables  indices; 

2  -  add  to  second  artery  variables  indices; 

3  -  add  to  third  artery  variables  indices; 

4  -  add  1  to  get  loop  variable  index. 

6.3.1.5  Outside  Variables. 

Altered:  None. 

Used:   from  GDOUT  —  DEL,  DELBAR,  Z,  B,  W,  WBAR,  T,  TBAR,  GAMMA 
from  MAXBAND  —  LOOP,  N,  INTER,  R,  L,  LBAR,  OUTVAR 


6.3.2  Subroutine  RDLCNT. 


6.  3.  2. 1  Purpose. 

Counts  the  number  of  left  turn  variables  (DEL's  and  DELBAR 's)      used     in 
each  artery. 

6.  3.2.2  Synopsis. 

MAXBAND  only  uses  DEL's  and      DELBAR »s     in     the      formulations     when     the 
corresponding     L's  and   LBAR's  are  greater  than  zero.      For  each  artery  ART, 


DELTAC(ART)   is  set  to  the  number  of     non-zero 
DELTBC(ART)   to   the  number  of  non-zero   LBAR's. 


L's     in     that     artery,     and 
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6.3.2.3  Subroutine  linkage. 

Called   by:      GETVAR 
Calls:      None. 

6.3.2.4  Local  Variables. 

Integer: 

ARTNO  Number  of  arteries  (1  or  3 ) . 

ART  Number  of  current  artery. 

LIMIT  N(ART)  —  number  of  intersections  in  current  artery. 

I  Iteration  variable  —  number  of  current  intersection. 

6.3.2.5  Outside  Variables. 

Altered:      from  GETVAR   —  DELTAC,    DELTBC 
Used:      from  MAXBAND   —  LOOP,    N,    L,    LBAR 


6.3.3     Subroutine  RFSTRT . 

6.  3.  3.  1   Purpose. 

Calculates  offsets  to  be  added  to  single  artery  variable  indices  to 
find  their  position  in  the  loop  formulation. 

6. 3. 3. 2  Synopsis. 

VSTART  contains  values  which  are  added  to  the  indices  of  variables  in 
the  single  artery  formulation  to  find  their  indices  in  the  loop 
formulation,  and  in  the  array  OUTVAR.  If  the  problem  is  a  single  artery, 
all  the  elements  of  VSTART  are  set  to  0.  If  the  problem  is  a  loop,  the 
first  three  elements  of  VSTART  are  given  values  to  be  added  to  the  indices 
of  variables  in  arteries  1,  2  and  3.  VSTART (4)  is  set  to  1  less  than  the 
index  of  the  loop  variable. 

6.3.3.3  Subroutine  linkage. 

Called  by:      GETVAR 
Calls:      None. 

6.3.3.4  Local  Variables. 
None. 

6.3.3.5  Outside  Variables. 

Altered:      from  GETVAR   —  VSTART 

Used:      from  GETVAR   —  DELTAC,    DELTBC 
from  MAXBAND   —  LOOP,    N 
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6.3.4     Subroutine  ASSIGN. 


6.  3.  4.  1   Purpose. 


Copies  solution  values  from  OUTVAR  to  variables  with  same  names  as     the 
formulation  variables. 

6.  3.  4.2  Synopsis. 


1.  AB  assigns  bandwidth  values  to   B. 

2.  AZ  assigns   inverse   cycle  time  to   Z. 

3.  AW  assigns  times  between  beginning  of  green  period  and  beginning 
of  bandwidth  period   in  the  outbound  direction  to  W. 

4.  AWBAR  assigns  times  between  end  of  bandwidth  period   and     end     of 
green  period   in  the  inbound  direction  to  WBAR. 

5.  AT  assigns  times  between  intersections  in  the  outbound  direction 
to  T. 

6.  ATBAR  assigns     times     between     intersections     in       the       inbound 
direction  to  TBAR. 

7.  ADELS  assigns  values  to   the  left  turn  variables  DEL  and      DELBAR. 
If  the  problem   is  a  loop: 


8.      AGAMS  assigns  the  values  of  the  all-red     period     variables,     the 
GAMMA'S. 

6.3.4.3  Subroutine  linkage. 

Called   by:      GETVAR 

Calls:      AB,    AZ ,    AW,    AWBAR,    AT,    ATBAR,    ADELS,    AGAMS 

6.3.4.4  Local  Variables. 

Integer: 

ARTNO        Number  of  artery. 

ART  Number  of  current  artery. 

6.3.4.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  DEL,    DELBAR,    Z,    B,    W,    WBAR,    T,    TBAR,    GAMMA 
from  GETVAR   —  VSTART,    DELTAC 
from  MAXBAND   —  LOOP,    N,    INTER,    R,    L,    LBAR,    OUTVAR 
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6.3.5  Subroutine  AB. 

6.3.5.1  Purpose. 

Sets  bandwidth  variables  (B). 

6. 3.5.2  Synopsis. 

For  each  artery  ART 


1.  The  outbound  bandwidth  BO.ART)    is  the     2*(ART-1  )  +   1st     element 
of  OUTVAR. 

2.  The  inbound  bandwidth  B(2,ART)    is  the  2*(ART-1  )  +  2nd   element  of 
OUTVAR. 

6.3.5.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:     None. 

6.3.5.4  Local  Variables. 

Integer: 

ARTNO        Number  of  arteries. 

ART  Number  of  current  artery. 

6.3.5.5  Outside  Variables. 

Altered:      from  GDOUT   —  B 

Used:      from  MAXAND   —  LOOP,    OUTVAR 


6.3.6  Subroutine  AZ . 

6.3.6.1  Purpose. 

Sets  variables  containing  inverse  of  cycle  time  in  cycles/ second  (Z). 

6. 3. 6.2  Synopsis. 

In  the  single  artery  problem  Z  is  OUTVAR (3).      In  the  loop  problem,   Z  is 
OUTVAR  (7). 

6.3.6.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:     None. 
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6.3.6.4  Local   Variables. 
None. 

6.3.6.5  Outside  Variables. 

Altered:   from  GDOUT  —  Z 

Used:   from  MAXBAND  —  LOOP,  OUTVAR 


6.3.7  Subroutine  AW. 
6.  3.  7. 1  Purpose. 

Sets  variables  containing  time  between  begginnings  of  green   and 
bandwidth  periods  in  the  outbound  direction  (W's). 

6.  3.  7.2  Synopsis. 

For     intersection       I       of       artery       ART,        W(I,ART)        is         set         to 
OUTVAR    (3    +  I    +  VSTART(ART)). 

6.3.7.3  Subroutine  linkage. 

Called  by:  ASSIGN 
Calls:   None. 

6.3.7.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

6.3.7.5  Outside  Variables. 

Altered:      from  GDOUT   —  W 
Used:      from  ASSIGN   —  ART 

from  GETVAR   —  VSTART 
from   MAXBAND   —  N,    OUTVAR 


6.3.8     Subroutine  AWBAR . 

6.  3.  8.  1   Purpose. 

Sets  variables  containing  time  between  ends  of  bandwidth  and  green 
periods  in  the- inbound  direction  (WBAR's). 
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6. 3. 8.2  Synopsis. 

For  intersection   I   of   artery   ART,   WBAR(I.ART)   is   set   to 
OUTVAR  ((N+  3)  +  I  +  VSTART(ART)). 

6.3.8.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:      None. 

6.3.8.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

6.3.8.5  Outside  Variables. 

Altered:      from  GDOUT   —  WBAR 
Used:      from  ASSIGN   —  ART 

from  GETVAR   —  VSTART 
from   MAXBAND   —  N,    OUTVAR 


6.3.9  Subroutine  AT. 

6.  3.  9. 1  Purpose. 

Sets  variables  containing  the  progression  traversal   times  in  cycles 
between  pairs  of  two  intersections  in  the  outbound  direction  (T's). 

6. 3. 9.2  Synopsis . 

For  intersection   I   of   artery   ART,   T(I,ART)   is    set    to 
OUTVAR  (2 *N  (ART)  +  3  +  I  +  VSTART  (ART) )  . 

6.3.9.3  Subroutine  linkage. 

Called   by:     ASSIGN 
Calls:      None. 

6.3.9.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit. 

I  Number  of  current  intersection. 
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6.3.9.5  Outside  Variables. 

Altered:   from  GDOUT  —  T 
Used:   from  ASSIGN  —  ART 

from  GETVAR  —  VSTART 
from  MAXBAND  —  N,  OUTVAR 


6.3.10  Subroutine  ATBAR . 

6.  3.  10. 1  Purpose. 

Sets  variables  containing  the  progression  traversal  times  in  cycles 
between  pairs  of  two  intersections  in  the  inbound  direction  (TBAR's). 

6.3. 10.2  Synopsis. 

For  intersection   I   of   artery   ART,    TBAR(I.ART)   is   set   to 
OUTVAR  (3  *N  (ART)  +  2  +  I  +  VSTART  ( ART) ) . 

6.3.10.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:     None. 

6.3.10.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit. 

I  Number  of  current  intersection. 

6.3.10.5  Outside  Variables. 

Altered:      from  GDOUT   —  TBAR 
Used:     from  ASSIGN   —  ART 

from  GETVAR   —  VSTART 
from  MAXBAND   —  N,    OUTVAR 


6.3.11      Subroutine  ADELS. 
6.  3. 1 1 . 1   Purpose. 

Sets  the  left  turn  variables  (DEL's  and  DELBAR's). 
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6.3. 11.2  Synopsis. 

Values  for  a  DEL  or  DELBAR  are  only  present  in  OUTVAR  if  the 
corresponding  L  or  LBAR  is  non-zero.  DELCNT  and  DLBCNT  are  incremented  as 
each  DEL  and  DELBAR  value  is  copied.  Hence  DELCNT  and  DLBCNT  point  to  the 
positions  in  OUTVAR  from  which  the  next  DEL  and   DELBAR  should  be  read. 

Steps: 


1.  Set   DELCNT  and   DLBCNT  to   1. 

2.  If  intersection  I  has  two  non-zero  left  splits,   i.e.,   L(I,ART)  > 

0  and  LBAR  (I,  ART)  >  0,  then  set  DEL  (I,  ART)  and  DELBAR  (I,  ART)  to 
the  appropriate  element  of  OUTVAR  and  increment  DELCNT  and 
DLBCNT. 

3.  If  only  L(I,ART)  >  0,  then  set  DEL  (I,  ART)  to  the  appropriate 
element  of  OUTVAR  and  DELBAR(I ,  ART)  =  1  -  DEL(I.ART).  This 
insures  that  the  pattern  selected    is    1    or  2.      Increment     DELCNT. 

4.  If  only     LBAR (I, ART)     >     0,      then     set     DELBAR (I, ART)        to        the 
appropriate       element     of     OUTVAR     and      DEL  (I,  ART)        =        1 
DELBAR  (I,  ART).      Increment   DLBCNT. 

5.  If  1(1, ART)  =  0  and  LBAR (I, ART)  =  0,  then  there  are  no  values 
for  DEL(I.ART)  and  DELBARCI ,  ART)  in  OUTVAR.  DEL(I.ART)  and 
DELBAR  (I,  ART)    are   set  to  0. 

Note  that  if  only  one  of  the  left  splits  at  a  intersection  is  non-zero, 
DEL  and  DELBAR  are  assigned  values  which  correspond  to  the  choice  of 
pattern    1    or  2. 

6.3.11.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:      None. 

6.3.11.4  Local  Variables. 

Integer: 

DELCNT  Number  of  DEL's  which  have  been  read   for  the     current 

artery  +  1 . 
DLBCNT  Number  of  DELBAR's     which     have     been     read      for     the 

current  artery  +  1 . 

1  Number  of  current  intersection. 

6.3.11.5  Outside  Variables. 

Altered:      from  GDOUT   —  DEL,    DELBAR 
Used:      from  ASSIGN   —  ART 

from  GETVAR   —  VSTART,    DELTAC 
from  MAXBAND   -  N,    L,    LBAR,    OUTVAR 
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6.3.12     Subroutine  AGAMS. 

6.  3.  12.  1    Purpose. 

Sets  the  variables  which  determine  the  allotment  of  all-red  periods  at 
artery  meetings   (GAMMMA's). 

6. 3. 12.2  Synopsis. 

For  each  artery  meeting  (ART1)  with  total  all-red  duration  (ALLRED)  > 
0,  set  GAMMA(ARTI)  to  the  appropriate  element  of  OUTVAR.  If  ALLRED  r  0, 
set   GAMMAURT1)    to   0. 

Steps: 


1.  Set   GAMCNT    ,    the   pointer   to   GAMMA  values  in   OUTVAR,    to   1. 
For  each  artery  meeting  ART1 

2.  Caluclate  the  duration  of  the   all-red   periods   (ALLRED). 

3.  If   ALLRED   >  0,    set  GAMMA(ARH)    to     the     appropriate     element     of 
OUTVAR   and    increment  GAMCNT. 

4.  IF  ALLRED   =  0,    there   is  no  all-red   period,    so   set  GAMMA(ARTI)      = 
0   as  a  default. 

6.3.12.3  Subroutine  linkage. 

Called  by:     ASSIGN 
Calls:      None. 

6.3.12.4  Local  Variables. 


Integer: 
GAMCNT 


ART1 

ART2 
INTER1 
INTER2 
INDEX 


An  index  variable  which,  when  added  to  VSTART(4)  +  1, 

gives  the  number  of  the  next  element  in  OUTVAR  which 

could  be  a  GAMMA. 
The  number  of  the  current  artery  meeting  and  the 

number  of  the  first  artery  at  the  current  artery 

meeting. 
The  number  of  the  second  artery  at  the  current  artery 

meeting. 
The  number  of  the  intersection  in  the  first  artery  at 

the  current  artery  meeting. 
The  number  of  the  intersection  in  the  second   artery 

at  the  current  artery  meeting. 
The  element  number  of  the  current  GAMMA  in  OUTVAR,  if 

ALLRED  >  0. 


Real: 
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ALLRED  Duration  of  all-red   periods   (in     cycles)      at     current 

artery  meeting. 

6.3.12.5  Outside  Variables. 

Altered:      from  GDOUT   —  GAMMA 
Used:      from  GETVAR   —  VSTART 

from  MAXBAND  —  INTER,    R,    LBAR,    OUTVAR 


6. 4     Computing  Solution  Report  Values. 

6.4.1     Subroutine  SETVAR . 

6.  4. 1.  1   Purpose. 

Computes  values     which     appear     in     the     solution     report     from     MPCODE 
solution  values. 

6. 4. 1.2  Synopsis. 

1.  Sets  ARTNO  to  number  of  arteries. 

2.  SETCYC  sets  the  cycle  time  (CYCLE). 

1 

3.  For  each  artery,  SETVAR  calls  SETGMC  to  set  variables  which 
contain  the  durations  of  the  outbound  and  inbound  green  splits, 
the  main  street  phase,  and  the  cross  street  core  time  for  each 
intersection  (G,  GBAR,  MAIN,  CROSS). 

4.  SETOFF  sets  the  beginning  and  ending  times  of  the  green,  red, 
left  and  bandwidth  periods,  in  each  direction,  and  the  main 
street  phase  and  cross  street  core  times,  at  each  intersection. 
These  are  the  values  ROFF,  GOFF,  LOFF,  BOFF,  RBOFF,  GBOFF, 
LBOFF,  BBOFF,  EROFF,  EGOFF,  ELOFF,  EBOFF,  ERBOFF,  EGBOFF, 
ELBOFF,  EBBOFF,  MOFF,  COFF,  EMOFF  and  ECOFF,  referred  to  as 
offsets  in  the  program. 

5.  Calls  ONERND  to  set  any  offsets  which  are  very  close  to  1  to  0. 
Offsets  must  be  in  the  range  0  _<  ...  <  1. 

6.  Calls  CNVSEC  to  convert  the  offsets,  splits  and  queue  clearnace 
times  for  cycles  to  seconds.  The  values  are  stored  in  BSEC, 
ESEC,  DSEC,  BNDSEC  and  TAUSEC. 

For  each  artery 
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7.  SETLPT  sets  the  array  SLPAT  which  contains  the  left  patterns 
selected . 

8.  SETLNK  computes  progression  times  and  speeds. 

6.4.1.3  Subroutine  linkage. 

Called  by:     GDOUT 

Calls:      SETCYC,    SETGMC,    SETOFF,    ONERED,    CNVSEC,    SETLPT,    SETLNK 

6.4.1.4  Local  Variables. 

Integer: 

ARTNO        Number  of  arteries  in  problem. 
ART  Number  of  current  artery. 

6.4.1.5  Outside  Variables. 

Altered:   None. 

Used:      from  GDOUT   —  SLPAT,    CYCLE,    G,    GBAR,    MAIN,    CROSS,    ROFF,    GOFF, 

LOFF,  BOFF,  RBOFF,  GBOFF,  LBOFF,  BBOFF, 
EROFF,  EGOFF,  ELOFF,  EBOFF,  ERBOFF,  EGBOFF, 
ELBOFF,  EBBOFF,  MOFF,  COFF,  EMOFF,  ECOFF, 
ASPD,  ASPDBR,  DTOT,  DBTOT,  TTOT,  TBTOT, 
TIME,  TIMBAR,  SPD,  SPDBAR,  BSEC,  ESEC,  DSEC, 
BNDSEC,  TAUSEC,  DEL,  DELBAR,  Z,  B,  W,  WBAR, 
T,  TBAR,  GAMMA 
from  MAXBAND  —  LOOP,  N,  INTER,  D,  DBAR,  R,  RBAR,  L,  LBAR, 
TAU,    TAUBAR 


6.4.2     Subroutine  SETCYC. 
6.  4.  2.  1    Purpose. 

Sets  cycle  time  in   seconds   (CYCLE). 

6.4.2.2  Synopsis. 

Cycle  time,   CYCLE,    is  set  to   the  inverse  of  the  inverse  cycle  time,     Z. 

6.4.2.3  Subroutine  linkage. 

Called  by:  SETVAR 
Calls:  None. 

6.4.2.4  Local  Variables. 
None. 
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6.4.2.5  Outside  Variables. 

Altered:      from  GDOUT   —  CYCLE 
Used:      From  GDOUT   —  Z 


6.4.3     Subroutine  SETGMC. 

6.  4.  3.  1    Purpose. 

Sets  the  green  splits  (G  and  GBAR)  and  the  main  and  cross  street  core 
time  duration  (MAIN  and  CROSS)  for  use  in  the  solution  report. 

6. 4. 3.2  Synopsis. 

The  green  splits  are  set  to  1  -  the  red  splits  in  the  corresponding 
direction.  The  main  street  phase  and  cross  street  core  time  durations  are 
set  according  to  the  split  model  explained  in  appendix  A. 

6.4.3.3  Subroutine  linkage. 

Called  by:      SETVAR 
Calls:      None. 

6.4.3.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

I  Number  of  current  intersection. 

6.4.3.5  Outside  Variables. 

Altered:   from  GDOUT  —  G,  GBAR,  MAIN,  CROSS 
Used:  from  SETVAR  —  ART 

from  MAXBAND  —  N,  R,  RBAR,  LBAR 


6.4.4  Subroutine  SETOFF. 
6.  4.  4. 1  Purpose. 

Sets  the  offset  variables  ROFF  -  ECOFF. 
6.4.4.2  Synopsis. 

For  each  artery 

1.   SETPHI  sets  the  variables  which  contain  the  distance  between 
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centers-of-red        at     adjacent     intersections     in     the       outbound 
direction   (PHI 's) . 

2.  SETDLT  sets  the  variables  which  contain     the     distances     between 
the  centers  of  inbound   and  outbounds  reds  (DELTA's). 

3.  SETOFB  uses  the   PHI's  and   DELTA'S  to  compute  the  beginning   times 
of  the  various  periods. 

If  the  problem   is  a  loop 


4.  CHKOFS  adjusts  the  beginning  times  on  arteries  2  and  3  so  that 
they  are  relative  to  the  start  of  the  green  period  at 
intersection   1   of  artery   1. 

For  each  artery 


5.  SETOFE  finds  the  end  times  of  the  various  periods. 

6.  STMCOF  sets  the  main  street  phase  and     cross     street     core     time 
beginning  and   ending  times. 

6.4.4.3  Subroutine  linkage. 

Called   by:      SETVAR 

Calls:      SETPHI,    SETDLT,    SETOFB,    CHKOFS,    SETOFE,    STMCOF 

6.4.4.4  Local  Variables. 

Real: 

DELTA(20,3)       Difference  between  centers  of     inbound     and     outbound 

reds. 
PHI  (19, 3)  Time       between         centers-of-red         of  successive 

intersections  in  the  outbound  direction. 

6.4.4.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  ROFF,    GOFF,    LOFF,    BOFF,      RBOFF,  GBOFF,      LBOFF, 

BBOFF,  EROFF,      EGOFF,    ELOFF,  EBOFF,    ERBOFF, 

EGBOFF,  ELBOFF,    EBBOFF,    MOFF,  COFF,      EMOFF, 

ECOFF,  DEL,      DELBAR,      B,      W,  WBAR,    T,    MAIN, 
GAMMA 

from  MAXBAND   —  LOOP,    N,  INTER,    R,    RBAR,    L,    LBAR,    TAU 
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6.4.5     Subroutine  SETPHI . 

6.4.5.1  Purpose. 

Sets  the  variables  which  represent  the  time  between  centers-of-red  at 
successive  intersections  immediately  to  the  left  of  the  outbound  bandwidth 
(PHI's). 

6. 4. 5.2  Synopsis. 

For  intersections  I  and  1+1  of  artery  ART,  PHI (I, ART)  is  set  to 

0.5*  R(I.ART)  +  W(I.ART)  +  T(I,ART) 
-  TAU(I+1,ART)  -  WU+1.ART)  -  0.  5*R  (1+1 ,  ART) 

according  to   figure  6   of  the  Summary  Report. 

6.4.5.3  Subroutine  linkage. 

Called   by:      SETOFF 
Calls:      None. 

6.4.5.4  Local  Variables. 

Integer: 

LIMIT  Iteration  limit. 

I  Number  of  current  intersection. 

IP1  Number  of  next  intersection —  I  +  1 

6.4.5.5  Outside  Variables. 

Altered:      from  SETOFF  —  PHI 
Used:      from   SETOFF   —  ART 
from  GDOUT   —  W,    T 
from  MAXBAND   —  N,    R,    RBAR,    TAU 


6.4.6     Subroutine  SETDLT . 

6.  4.  6. 1    Purpose. 

Sets  variables  which  represent  the  time  between  the     centers-of-red      in 
the  inbound   and   outbound  directions  (DELTA' s). 

6. 4. 6.2  Synopsis. 

For  intersection  I  of  artery  ART,  DELTA(I.ART)  is  set  to 

0.5*(R(I,ART)  -  RBAR  (I,  ART)) 
+  DEL(I,ART)*LBAR(I,ART)  -  DELBAR  (I ,  ART  )*LBAR  (I ,  ART  ) 
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according  to  the  left  turn  model  shown  in  appendix  A. 

6.4.6.3  Subroutine  linkage. 

Called  by:     SETOFF 
Calls:      None. 

6.4.6.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

6.4.6.5  Outside  Variables. 

Altered:   from  SETOFF  —  DELTA 
Used:   from  SETOFF  —  ART 

from  GDOUT  —  DEL,  DELBAR 

from  MAXBAND  —  N,  R,  RBAR,  L,  LBAR 


6.4.7  Subroutine  SETOFB . 

6.  4.  7. 1  Purpose. 

Sets  the  variables  which  contain  the  beginnings  of  the  intersection 
phases  in  the  outbound  and  inbound  directions  (outbound:  ROFF  -  BOFF; 
inbound:   RBOFF  -  BBOFF) . 

6. 4. 7. 2  Synopsis. 

Outbound  offsets: 


1.  The  beginning  of  the  green  period  of  the  first  intersection  of 
artery  ART,  GOFF(1,ART)  is  set  to  0.  The  beginning  of  the  red 
period,  ROFFO.ART)  is  set  so  that  the  red  period  ends  at  1 
cycle. 

2.  For  subsequent  intersections,  R0FF(I,ART)  is  set  to  the 
fractional   portion  of 

R0FFU-1.ART)  +   0.5*R(I-1,ART)   +  PHI  (1-1,  ART) 
-  0.5*R(I,ART) 

according  to   figure  6  of  the  final  report.   GOFF(I.ART)  is  set 
to  the  fracional  portion  of  G0FF(I,ART)  +  W(I.ART). 

3.  BOFF(I.ART),  the  beginning  of  the  bandwidth  period,  is  set  to 
the  fractional  part  of 

GOFF(I.ART)  +  W(I.ART) 
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Inbound  offsets: 


4.      DELTA(I,ART)    is  used   to  cmpute  the  beginning   of  the   inbound   read 
period,    RBOFFCI, ART) .which  is  set  to   the   fractional   part  of 


ROFF(I.ART)  +  0.5*R(I,ART) 
-  DELTA(I.ART)  -  0.  5*RBAR  (I ,  ART  ) 


5.   GBOFFCI, ART) ,  the  beginning  of  the  inbound  green  period,  is  set 
to  the  fractional  part  of 


RBOFFCI,  ART)  +  RBAR(I.ART) 


6.   BBOFFCI, ART) ,  the  beginning  of  the  inbound  bandwidth  period,   is 
set  to  the  fractional  portion  of 

RBOFFCI, ART)  -  WBAR(I.ART)  -  B(2,ART) 


Left  turns: 

7.  If  DEL(I.ART)  =  0,  the  outbound  left  turn  period  leads  the 
inbound  green  period,  so  L0FF(I,ART)  is  set  to  the  fractional 
part  of 

GBOFFCI,  ART)  -  L(I,ART) 

If  DEL(I.ART)  =  1,   the  outbound  left  turn  period  lags  the 
inbound  green  period,  so  LOFF(I.ART)  is  set  to 

RBOFFCI, ART) 

8.  Similarly,  if  DELBARCI, ART)  =  0,  LBOFF(I.ART)  isset  the 
fractional  part  of 

GOFF(I.ART)  -  LBAR(I.ART) 

If   DELBARCI, ART)   =    1,    LBOFF(I.ART)    is   set  to   ROFF(I.ART). 

6.4.7.3  Subroutine  linkage. 

Called  by:     SETOFF 
Calls:     None. 
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6.4.7.4  Local  Variables. 


Integer: 
I 
IM1 


Real 


OFF 
OFFBAR 


Number  of  current  intersection. 
1-1. 


For  outbound  direction,  holds  values  of   offsets 

before  integer  part  is  removed. 
For  inbound  direction,  holds  values  of  offsets  before 

integer  part  is  removed. 


6.4.7.5  Outside  Variables. 

Altered:      from  GDOUT   —  ROFF,    GOFF,    LOFF,    BOFF,      RBOFF,      GBOFF,      LBOFF, 

BBOFF 
Used:      from   SETOFF  —  ART,    PHI,    DELTA 

from  GDOUT   —  DEL,    DELBAR,    B,    W,    WBAR 
from  MAXBAND   —  N,    R,    RBAR,    L,    LBAR 


6.4.8     Subroutine  CHKOFS . 

6.4.8.1    Purpose. 

In  a  loop,  adjusts  the  offsets  of  arteries  2  nd  3  so  that  they  are 
relative  to  the  start  of  the  green  period  at  intersection  1  in  artery  1. 

6.  4.  8.2  Synopsis. 

For  the  meetings  of  arteries   1   and  2,   and  2  and  3 


1.      0FF1   is  set  to   the  beginning  of     the     cross  street     core     time, 

where  the  cross  street  is  the  second   artery  at  the  meeting   (2   or 

3).           If      DE  LBAR  (INT  1,  ART  1)      =      0,      0FF1  =       R0FFUNT1,  ART1 ) . 
Otherwise,   OFF1   is  the  fraction  portion  of 

LB0FF(INT1,ART1)   +  LBAR  (INT1 ,  ART  1 ) 


Next,  the  beginning  of  the  main  street  phase  on  the  second 
artery,  0FF2,  is  calculated  from  the  beginning  times  computed  in 
SETOFB.  These  times  assume  that  the  green  period  at  the  first 
intersection  of  the  artery  begins  at  0.  0FF2  is  set  to 
LB0FF(INT2,ART2)  if  DELBAR (INT2,  ART2)  =  0,  and  G0FFUNT2,  ART2) 
otherwise. 

ALLRED  is  set  to  the  portion  of  the  cycle  which  is  not  available 
to  any  turning  movement  of  either  phase. 
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4.  DIFF  is  set  to  the  amount  to  be  subtracted  from  the  settings  of 
artery  ART2  to  make  them  consistent  with  those  of  artery  ART1. 
GAMMA(ARH)  is  used  to  determine  how  the  ALLRED  period  will  be 
apportioned . 

5.  If  DIFF  is  0,  the  settings  of  artery  ART2  do  not  need  to  be 
changed.  Otherwise,  new  settings  are  obtained  by  subtracting 
DIFF  from  the  settings  and   taking  the  fraction  poriton. 

6.4.8.3  Subroutine  linkage. 


Called  by: 
Calls: 


SETOFF 
None. 


6.4.8.4  Local  Variables. 


Integer: 
ART1 
ART2 
INT1 

INT2 

LIMIT 

I 


The  first  artery  at  the  current  artery  meeting. 

The  second  artery  at  the  current  artery  meeting. 

The  intersection  number  in  ART1  at  the  current  artery 

meeting. 
The  intersection  number  in  ART2  at  the  current  artery 

meeting. 

Iteration  limit. 
Iteration  variable  —  number  of  current     intersection 

when   changing   settings  in  DO  200   loop. 


Real: 

0FF1 

0FF2 

ALLRED 

DIFF 


Time  at  which  cross     street     core     time     begins     from 

point  of  view  of   1ART1. 
Time  at  which  main   street  phase  begins  from   point     of 

view  of  ART2. 
The  portion  of  the     cycle     not     available     to     either 

phase  —  all-red   time. 
The  amount  to   be  subtracted   from  the   settings  of  ART2 

so   that  they  will  be  relative     to      the     settings     of 

ART1. 


6.4.8.5  Outside  Variables. 

Altered:      from  GDOUT   —  ROFF,    GOFF,    LOFF,    BOFF,      RBOFF,      GBOFF,      LBOFF, 

BBOFF 
Used:      from  GDOUT   —  DELBAR,    GAMMA 

from  MAXBAND   —  N,    INTER,    R,    LBAR 


6.4.9     Subroutine  SETOFE . 
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6.4.9.1  Purpose. 

Sets  variables  which  contain  the  endings  of  the  intersection  phases  in 
the  outbound  and  inbound  directions  (outbound:  EROFF  -  EBOFF;  inbound: 
ERBOFF  -  EBBOFF) . 

6.4.9.2  Synopsis. 

The  ending  times  of  the  red  periods  are  set  to  the  beginning  times  of 
the  green  periods,  and  vice  versa.  The  ending  times  of  the  left  and 
bandwidth  periods  are  obtained  by  adding  the  length  of  the  period  to  its 
starting  time  and  taking  the  fraction  portion. 

6.4.9.3  Subroutine  linkage. 

Called   by:      SETOFF 
Calls:     None. 

6.4.9.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

Real: 

OFF  For  outbound  direction,  holds  values  of  settings 

before  integer  part  is  removed. 
OFFBAR       For  inbound  direction,  holds  values  of   settings 

before  integer  part  is  removed. 

6.4.9.5  Outside  Variables. 

Altered:      from  GDOUT   —  EROFF,    EGOFF,      ELOFF,      EBOFF,      ERBOFF,      EGBOFF, 

ELBOFF,    EBBOFF 
Used:      from  SETOFF   —  ART 

from  GDOUT   —  ROFF,    GOFF,    LOFF,    BOFF,      RBOFF,      GBOFF,      LBOFF, 

BBOFF,    B 
from  MAXBAND  —  N,    L,    LBAR 


6.4.10     Subroutine  STMCOF. 


6.4.10.1   Purpose. 


Sets  variables  which  give  settings  for  the  main  street  phase  and  the 
cross  street  core  time  (MOFF  -  ECOFF) . 
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6. 4. 10.2  Synopsis. 

For  each  intersection  I  of  artery  ART 


1.  MOFF(I.ART)  is  set  to  the  beginning  time  of  the  main  street 
phase.  This  value  depends  on  the  inbound  left  turn  pattern, 
indicated  by  DELBARG  ,  ART) . 

2.  EMOFF(I.ART)  is  the  fractional  portion  of  MOFF(I.ART)  plus  the 
duration  of  the  main  street  phase,  MAIN (I, ART). 

3.  The  cross  street  core  time  settings,  COFF(I.ART)  and 
ECOFF(I,ART)  are  assigned  values  which  give  the  cross  street 
core  time  the  part  of  the  cycle  not  used  by  the  main  street 
phase. 

6.4.10.3  Subroutine  linkage. 

Called  by:     SETOFF 
Calls:      None. 

6.4.10.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

Real: 

OFF  Holds  settings  before  integer  part  is  removed. 

6.4.10.5  Outside  Variables. 

Altered:   from  GDOUT  —  MOFF,  COFF,  EMOFF,  ECOFF 

Used:  from  SETOFF  —  ART 

from  GDOUT  —  DELBAR,  GOFF,  LBOFF,  MAIN 

from  MAXBAND  —  N 


6.4.11  Subroutine  ONERND. 


6.  4. 1 1 .  1  Purpose. 


Sets  settings  whch  are  close  to  1 ,  to  0,  so  that  all  settings  are 
greater  than  or  equal  to  0  and  less  than  1  when  printed  in  the  solution 
report. 
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6. 4. 1 1 . 2  Synopsis. 

For  each  intersection  I  of  each  artery  ART,   CKONE  makes  sure  that 
GOFF(I.ART)  -  ECOFF(I.ART)  are  >  0  and  <  1 . 

6.4.11.3  Subroutine  linkage. 

Called   by:      SETVAR 
Calls:      CKONE 

6.4.11.4  Local  Variables. 

Integer: 

ARTNO        Number  of  arteries  in  problem. 

ART  Number  of  current  artery. 

LIMIT        Iteration  limit  —  N(ART)  —  number  of  intersections 

in  current  artery. 
I  Number  of  current  intersection. 

6.4.11.5  Outside  Variables. 

Altered:      from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      GBOFF,      RBOFF,      LBOFF, 

BBOFF,      EGOFF,      EROFF,    ELOFF,    EBOFF,    EGBOFF, 
ERBOFF,    ELBOFF,    EBBOFF,    MOFF,      COFF,      EMOFF, 
EC  OFF 
Used:      from   MAXBAND   —  LOOP,    N 


6.4.12     Subroutine  CKONE. 

6.4.12.1  Purpose. 

Change  settings  which  are  close  to  1,  to  0. 

6.4. 12.2  Synopsis. 

The  setting  is  set  to  0  if  is  is  >  0.99995. 

6.4.12.3  Subroutine  linkage. 

Called  by:     ONERND 
Calls:      None. 

6.4.12.4  Local  Variables. 
None. 
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6.4.12.5  Outside  Variables. 

Altered:   OFFSET,  which  may  be  any  of  GOFF  to  ECOFF  —  from  GDOUT. 
Used:  None. 


6.4.13  Subroutine  CNVSEC . 

6.  4.  13. 1  Purpose. 

Sets  the  variables  which  hold  the  settings  in  seconds. 

6.4. 13.2  Synopsis. 

Values  are     converted     from     fractions     of     a     cycle     to       seconds       by 
multiplying  them  by  the  cycle  length,    CYCLE. 

For  each  artery   ART 


1.      BNDSECd  ,ART)    and   BNDSEC(2,  ART)   contain     the     durations     of     the 
outbound   and   inbound1 periods. 

For  each  intersection  I  of  each  artery  ART 


2.  BSEC(1,I,ART)  to  BSEC(  1 0, 1,  ART )  contain  the  values  of  GOFF  - 
BOFF,    GBOFF  -  BBOFF,   MOFF  and   COFF,    converted    into   seconds. 

3.  ESECO  ,  I,  ART)  to  ESECO0, 1,  ART)  contain  the  values  of  the  ends 
of  the  intersection  periods,  EGOFF  -  EBOFF,  EGBOFF  -  EBBOFF, 
EMOFF  and   ECOFF,    converted    into   seconds. 

4.  DSEC(1,I,ART)  to  DSEC(8, 1,  ART)  contain  the  values  of  the 
intersection  period  durations,  G  -  L,  GBAR  -  LBAR,  MAIN  and 
CROSS,  converted  into  seconds.  The  durations  of  the  bandwidth 
periods  in  seconds  are  in  BNDSEC. 

5.  TAUSECO  ,I,ART)  and  TAUSEC(2, 1,  ART)  contain  the  queue  clearance 
times  TAU(I,ART)   and   TAUBAR(I, ART)    converted    into   seconds. 

6.4.13.3  Subroutine  linkage. 

Called  by:     SETVAR 
Calls:      None. 
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6.4.13.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

ARTNO  Number  of  arteries  in  problem. 

LIMIT  Iteration  limit. 

I  Number  of  current  intersection. 

Real: 


6.4.13.5  Outside  Variables. 

Altered:      from  GDOUT   —  BNDSEC,    BSEC,    ESEC,    DSEC,    TAUSEC 

Used:      from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      GBOFF,      RBOFF,      LBOFF, 

BBOFF,      EGOFF,      EROFF,    ELOFF,    EBOFF,    EGBOFF, 
ERBOFF,    ELBOFF,    EBBOFF,    MOFF,      COFF,      EMOFF, 
ECOFF,    G,    GBAR,    B,    MAIN,    CROSS,    CYCLE 
from   MAXBAND   —  LOOP,    N,    R,    RBAR,    L,    LBAR,    TAU,    TAUBAR 


6.4.14     Subroutine  SETLPT . 

6.4.  14.  1    Purpose. 

Determines  the  numbers  of  the  left  patterns  which     have     been     selected 
(SLPAT). 

6.4. 14.2  Synopsis. 

For   intersection   I  of  artery  ART,    SLPAT (I, ART)    is   set  to 

1.  1    if   DEL  (I,  ART)   =   0    and  DELBARd ,  ART)   =    1; 

2.  2  if   DEL(I.ART)   =    1    and  DELBARd,  ART)   =   0; 

3.  3  if  DEL(I.ART)   =   0   and  DELBARd,  ART)   =   0; 

4.  4  if  DEL(I.ART)   =    1    and  DELBARd, ART)   =    1. 

6.4.14.3  Subroutine  linkage. 

Called   by:      SETVAR 
Calls:      None. 
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6.4.14.4  Local  Variables. 

Integer: 

I  Number  of  current  intersection. 

6.4.14.5  Outside  Variables. 

Altered:      from  GDOUT   —  SLPAT 
Used:      from   SETVAR   —  ART 

from  GDOUT   —  DEL,    DELBAR 
from  MAXBAND   —  N 


6.4.15     Subroutine  SETLNK . 

6.  4. 15. 1   Purpose  . 

Sets  output  variables  which  contain  times  and  speeds  on  links  and 
arteries. 

6. 4. 15.2  Synopsis. 

For  each  link  I  in  artery  ART 


1.      TIME (I, ART)   and      TIMBARCI , ART)      contin     the     travesal      times  in 

seconds     in  the  outbound   and    inbound   directions;     SPD(I.ART)  and 

SPDBAR(I , ART)    contain  the  traversal      speeds     in     feet/second  or 
meters/ second    in  the  outbound   and    inbound   directions. 

Total   artery  values  for  artery  ART 


2.  DTOT(ART)  and  DBTOT(ART)  contain  the  total  length  of  the  artery, 
outbound  and  inbound,  in  feet  or  meters.  TTOT  and  TBTOT  contain 
the  total  traversal  time  of  the  artery  in  seconds,  outbound  and 
inbound . 

3.  ASPD(ART)  and  ASPDBR(ART)  contain  the  outbound  and  inbound  speed 
for  the  entire  artery,   in   feet/second   or  meters/second. 

6.4.15.3  Subroutine  linkage. 

Called   by:      SETVAR 
Calls:      None. 


-     203  - 


6.4.15.4  Local  Variables. 

Integer: 

LIMIT  Iteration  limit. 

I  Iteration  variable.      —  number  of  current  link. 

6.4.15.5  Outside  Variables. 

Altered:      from  GDOUT   —  ASPD,    ASPDBR,    DTOT,    DBTOT,    TTOT,      TBTOT,      TIME, 

TIMBAR,    SPD,    SPDBAR 
Used:     from  SETVAR  —  ART 

from  GDOUT   —  Z,    T,    TBAR 
from  MAXBAND  —  N,    D,    DBAR 


6. 5     The  Solution  Report. 

6.5.1      Subroutine  REPORT. 
6.5. 1.  1   Purpose. 

Writes  the  solution  report. 

6. 5. 1 .2  Synopsis. 

1.  Write  the  header  line  (1000). 

2.  If  the  problem  is  a  single  artery,  write  the  artery  statement 
(2000)  and  call  ARTOUT  to  reproduce  the  single  artery  report. 

3.  If  the  problem  is  a  loop,  write  the  loop  statement  (3000)  and 
call  LP0UT  to  produce  the  loop  report. 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.1.3  Subroutine  linkage. 

Called  by:  GDOUT 

Calls:  ARTOUT,  LP0UT 

6.5.1.4  Local  Variables. 
None. 
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6.5.1.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  SLPAT,    CYCLE,    B,    ROFF,    GOFF,    LOFF,    BOFF,    RBOFF, 

GBOFF,  LBOFF,  BBOFF,  EROFF,  EGOFF,  ELOFF, 
EBOFF,  ERBOFF,  EGBOFF,  ELBOFF,  EBBOFF,  MOFF, 
COFF,  EMOFF,  ECOFF,  MAIN,  CROSS,  G,  GBAR, 
TIME,  TIM BAR,  SPD,  SPDBAR,  DTOT,  DBTOT, 
TTOT,  TBTOT,  ASPD,  APSDBR,  BSEC,  ESEC,  DSEC, 
BNDSEC,  TAUSEC 
from  MAXBAND  —  LOOP,  N,  METRIC,  INTER,  SEQNO,  BESOBJ,  R, 
RBAR,  L,  LBAR,  D,  DBAR,  TAU,  TAUBAR,  LNAME, 
ANAME,    NODENO,    INAME,    ORIENT 


6.5.2     Subroutine  ARTOUT. 

6.5.2.1  Purpose. 

Writes  the  solution  report  for  an  artery. 

6.5.2.2  Synopsis. 

1.  SETDIR  and  SETUNT  obtain  units  and  conversion  factors  to  be  used 
in  printing  the  report. 

2.  Spaces  properly  for  the  type  of  report  being  generated. 

3.  Writes  general  information  about  the  artery:   name,  number  of 
intersections,  direction  of  entry  and  units  used  (1000). 

4.  Writes  heading  indicating  start  of  best  solution  (2000). 

5.  Writes  cycle  time  and  bandwidths  found  (3000). 

6.  If  the  problem  is  a  single  artery,  writes  the  value  of  the 
objective  function  at  the  best  solution  (4000). 

7.  Calls  INTINF  to  print  indentification  and  left  turn  information 
about  specific  intersections. 

8.  Calls  PHSFRC  to  print  the  intersection  settings  in  fractions  of 
a  cycle. 

9.  Calls  PHSSEC  to  print  the  intersection  settings  in  seconds. 

10.  Calls  TIMSPD  to  print  the  progression  times  and  speeds. 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 
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6.5.2.3  Subroutine  linkage. 

Called  by:  REPORT 

Calls:  SETDIR,    SETUNT,    INTINF,    PHSFRC,    PHSSEC,    TIMSPD 

6.5.2.4  Local  Variables. 

Integer: 

LINE  Number  of  current  line  from  the  top  of  the  page. 

I  Iteration  variable. 

LIMIT  Not  used. 

J  Not  used. 


Real: 

CONV 


Conversion  factor  — 
feet/second  to  miles/hour  or 
meters/ second  to  kilos/hour. 


Real*8: 
OUT 
IN 
UNITS 

UNIT1 

UNIT2(2) 

OUT  2 
IN  2 


Alphanumeric  name  of  outbound  direction. 

Alphanumeric  name  of  inbound  direction. 

Alphanumeric  name  of  units  being  used  (English  or 

metric) . 
Alphanumeric  name  of  distance  unit  in  parentheses  — 

(feet)  or  (meters) 
Alphanumeric  name  of  speed  units  in  parentheses  — 

(miles/hour)  or  (kilos/hour)  . 
Alphanumeric  name  of  outbound  direction  in  artery  1. 
Alphanumeric  name  of  inbound  direction  in  artery  1. 


6.5.2.5  Outside  Variables. 

Altered:   None. 

Used:   from  REPORT  or  LPOUT  —  ART  (passed  as  a  value) 

from  GDOUT  —  SLPAT,  CYCLE,  B,  ROFF,  GOFF,  LOFF,  BOFF,  RBOFF, 
GBOFF,  LBOFF,  BBOFF,  EROFF,  EGOFF,  ELOFF, 
EBOFF,  ERBOFF,  EGBOFF,  ELBOFF,  EBBOFF,  MOFF, 
COFF,  EMOFF,  ECOFF,  MAIN,  CROSS,  G,  GBAR, 
TIME,  TIM BAR,  SPD,  SPDBAR,  DTOT,  DBTOT, 
TTOT,  TBTOT,  ASPD,  ASDPBR,  BSEC,  ESEC,  DSEC, 
BNDSEC,  TAUSEC 
form  MAXBAND  —  LOOP,  METRIC,  N,  SEQNO,  BESOBJ,  R,  RBAR,  L, 
LBAR,  D,  DBAR,  TAU,  TAUBAR,  ANAME,  NODENO, 
INAME,  ORIENT 


6.5.3  Subroutine  INTINF. 


-  206  - 


6.  5.  3. 1  Purpose. 

Writes  'Intersection  Information'  section  of  output. 
6.5.3.2  Synopsis. 


1.  If  there  is  not  sufficient  room  on  the  page  for  the  section,  a 
new  page  is  started  (1000). 

2.  Writes  the  heading  (2000). 

3.  For  each  intersection  of  the  artery,  writes  the  number  of  the 
intersection  (signal),  the  node  number,  the  sequence  number,  the 
cross  street  name,  and  the  left  turn  pattern  selected.  If  there 
are  no  left  turns,  the  left  turn  field  is  left  blank  (3000, 
4000) 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.3.3  Subroutine  linkage. 

Called  by:  ARTOUT 
Calls:  None. 

6.5.3.4  Local  Variables. 

Integer: 

LIMIT  Iteration  limit  —  number  of  intersections  in  artery. 

I  Number  of  current  intersection. 

J  Iteration  variable. 

6.5.3.5  Outside  Variables. 

Altered:      None. 

Used:      from  ARTOUT   —  LINE 

from  REPORT  or  LPOUT   —  ART    (passed   as  a  value   to   ARTOUT) 

from  GDOUT   —  SLPAT 

from  MAXBAND   —  N,    L,    LBAR,    NODENO,    SEQNO,    INAME 


6.5.4     Subroutine  DIVCYC . 


6.  5.  4. 1    Purpose. 


This  routine  is  not  currently  being  used.  It  writes  a  section 
containing  information  about  the  division  of  the  cycle  between  the  main 
street  phase  and  the  cross  street  core  time. 


-  207  - 


6. 5. 4. 2  Synopsis. 


1.  If  there  is  not  sufficient  room  on  the  page  for  the  seciont,  a 
new  page  is  started  (1000). 

2.  Writes  the  heading  (2000). 

3.  For  each  intersection  of  the  artery,  writes  the  intersection 
(signal)  number,  the  beginning  and  ending  times,  and  duration  of 
the  main  street  phase  and  cross  street  core  time  in  fractions  of 
a  cycle  and  seconds  (3000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.4.3  Subroutine  linkage. 

Called  by:  ARTOUT 
Calls:   None. 

6.5.4.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit  —  number  of  intersections  in  artery. 
I  Number  of  current  intersection. 

6.5.4.5  Outside  Variables. 

Altered:   None. 

Used:   from  ARTOUT  —  LINE 

from  REPORT  or  LPOUT  —  ART  (passed  as  a  value  to  ARTOUT) 
from  GDOUT  —  MOFF,  COFF,  EMOFF,  ECOFF,   MAIN,   CROSS,   BSEC, 

ESEC,  DSEC 
from  MAXBAND  —  N 


6.5.5  Subroutine  PHSFRC . 
6.  5.  5. 1  Purpose. 

Writes  'Phase  settings  —  fractions  of  a  cycle'  section  of  output. 
6.5.5.2  Synopsis. 


1.  If  there  is  not  sufficient  room  on  the  page  for  the  section, 
starts  a  new  page  (1000). 

2.  Writes  the  heading  (2000). 
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For  each  intersection  of  the  artery 


3.  Starts  a  new  page  if  a  bottom  of  current  page. 

4.  Writes  the  intersection  (signal)  number,  followed  by  the 
settings  and  durations  of  the  green,  red,  left  and  bandwidth 
periods  and  the  duration  of  the  queue  clearance  time  for  the 
outbound  direction  in  fractions  of  a  cycle  (3000  or  4000).  The 
left  duration  field  is  left  blank  if  there  is  no  outbound  left 
turn. 

5.  Repeats  the  same  information  (except  for  intersection  number) 
for  the  inbound  direction  (5000  or  6000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.5.3  Subroutine  linkage. 

Called  by:     ARTOUT 
Calls:      None. 

6.5.5.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit  —  number  of  intersections  in  artery 

ART. 
I  Number  of  current  intersection. 

6.5.5.5  Outside  Variables. 

Altered:      None. 

Used:      from   ARTOUT   —  LINE,    OUT,    IN 

from   REPORT  or  LPOUT   —  ART    (passed   as  a  value  to   ARTOUT) 
from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      EGOFF,      EROFF,      ELOFF, 
EBOFF,      GBOFF,       RBOFF,    LB0FF,    BBOFF,    EGBOFF, 
ERBOFF,    ELBOFF,    EBBOFF,    G,    GBAR,    B 
from  MAXBAND  —  N,    R,    RBAR,    L,    LBAR,    TAU,    TAUBAR 


6.5.6     Subroutine  PHSSEC . 
6.5.6.1   Purpose. 

Writes   'Phase   Settings  —   seconds'    section  of  output. 
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6.5.6.2  Synopsis. 


1.  If  there  is  not  sufficient  room  on  the  page  for  the  section, 
starts  a  new  page  (1000). 

2.  Writes  the  heading  (2000). 

For  each  intersection  of  the  artery 

3.  Starts  a  new  page  if  at  bottom  of  current  page. 

4.  Writes  the  intersection  (signal)  number,  followed  by  the 
settings  and  durations  of  the  green  red  left  and  bandwidth 
periods  and  the  duration  of  the  queue  clearance  time  for  the 
outbound  direction  in  seconds  (3000  or  4000).  The  left  duration 
field  is  left  blank  if  there  is  no  outbound  left  turn. 

5.  Repeats  the  same  information  (except  for  intersection  number) 
for  the  inbound  direction  (5000  or  6000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.6.3  Subroutine  linkage. 

Called  by:     ARTOUT 
Calls:     None. 

6.5.6.4  Local  Variables. 

Integer: 

LIMIT        Iteration  limit  —  number  of  intersections  in  artery 

ART. 
I  Number  of  current  intersection. 

6.5.6.5  Outside  Variables. 

Altered:  None. 

Used:   from  ARTOUT  —  LINE,  OUT,  IN 

from  REPORT  or  LPOUT  —  ART  (passed  as  a  value  to  ARTOUT). 
from  GDOUT  —  BSEC,  ESEC,  DSEC,  BNDSEC,  TAUSEC 
from  MAXBAND  —  N,  L,  LBAR 


6.5.7  Subroutine  TIMSPD. 
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6.  5.  7. 1  Purpose. 

Writes  'Progression  Times  and  Speeds'  section  of  output. 
6.5.7.2  Synopsis. 


1.  If  there  is  not  sufficient  room  on  the  page  for  the  section, 
starts  a  new  page  (1000). 

2.  Writes  the  heading  (2000). 

3.  For  each  pair  of  outbound  and  inbound  links  in  the  artery, 
writes  the  link  length,  link  traversal  time  and  link  speed  for 
the  outbound  and  inbound  directions.  The  speeds  are  converted 
from  feet/second  or  meters/ second  to  miles/hour  or  kilos/hour 
before  they  are  printed  by  multiplying  them  by  CONV.  The  link 
pairs  are  identified  by  printing  the  numbers  of  the 
intersections  (signals)  at  their  ends  before  and  after  the  time 
and  speed  lines  (3000). 

4.  After  writing  the  number  of  the  last  intersection  (signal), 
writes  the  total  distance,  time  and  speed  in  the  outbound  and 
inbound  directions  of  the  artery.  As  before,  CONV  is  used  to 
convert  speeds  to  miles/hour  or  kilos/hour  (4000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.7.3  Subroutine  linkage. 

Called  by:  ARTOUT 
Calls:   None. 

6.5.7.4  Local  Variables. 

Integer: 

LIMIT  Iteration  limit  —  number  of  link  pairs  in  artery. 

I  Number  of  current  link  pair. 

Real: 

0SPD1  Outbound    speed   on  link  or     artery     in     miles/hour     or 

kilos/hour . 
0SPD2  Inbound   speed  on  link     or     artery     in     miles/hour     or 

kilos/hour . 

6.5.7.5  Outside  Variables. 

Altered:   None. 

Used:   from  ARTOUT  —  LINE,  CONV,  OUT,  IN,  UNIT1,  UNIT2 

from  REPORT  or  LPOUT  —  ART  (passed  as  a  value  to  ARTOUT) 
from  GDOUT  —  TIME,  TIMBAR,  SPD,  SPDBAR,  DTOT,   DBTOT,   TTOT, 
TBTOT,  ASPD,  ASPDBR 
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from  MAXBAND 


N,  D,  DBAR 


6.5.8  Subroutine  SETDIR. 

6.  5.  8.  1  Purpose. 

Assigns  alpha-numeric  direction  names  for  use  in  output.  This  routine 
is  the   same  as   ISTDIR   in  the   INPUT  module. 

6. 5. 8.2  Synopsis. 

Assign  OUT  and  IN  the  proper  pair  of  values  from  the  set  NORTH,  SOUTH, 
EAST  and  WEST,  depending  on  the  direction  of  intersection  entry  indicated 
in   ORIENT(ART). 

6.5.8.3  Subroutine  linkage. 

Called   by:     ARTOUT,    LOOPTP,    JNTOUT 
Calls:      None. 

6.5.8.4  Local  Variables. 


Real*8: 
LETS 
LETN 
LETW 
LETE 
SOUTH 
NORTH 
WEST 
EAST 


The  letter   'S'. 

The  letter   'N'. 

The  letter   'W»  . 

The  letter   'E'    (not  used). 

The  word    'SOUTH'. 

The  word    'NORTH'. 

The  word    '    WEST'. 

The  word    '    EAST'.. 


Note  that  WEST  and  EAST  contain  five  characters,  the  first  being  a 
blank. 

6.5.8.5  Outside  Variables. 

Altered:      from  ARTOUT   -  OUT,    IN 

Used:      from   REPORT  or   LPOUT   —  ART    (passed   as  a  value  to   ARTOUT) 
from  MAXBAND   —  ORIENT 

Note:  ART  may  also  have  a  value  set  in  ARTOUT,  and  OUT  and  IN  may 
correspond  to  OUT  and  IN  or  0UT2  and  IN2  in  ARTOUT,  or  to  OUT (ART)  and 
IN  (ART)   from  LOOPTP  or   JNTOUT,    where  ART=1,    2  or  3. 
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6.5.9     Subroutine  SETUNT . 

6.5.9.1  Purpose. 

Assigns  alpha-numeric  names  of  units  and   a  conversion   factor     for     used 
in  the  output.      This  routine  is  the  same  as   ISTUNT  in  the   INPUT  module. 

6. 5. 9.2  Synopsis . 

Assigns  UNITS,  UNIT1,  UNIT2  and  CONV  either  English  or  metric  unitts, 
according  to  the  value  of  METRIC(ART). 

6.5.9.3  Subroutine  linkage. 

Called  by:     ARTOUT 
Calls:      None. 

6.5.9.4  Local  Variables. 


Real*8: 
ENGL 
METR 
FEET 
METERS 
MPH 
KPH 
HOUR 


The  word  ENGLISH. 
The  word  METRIC. 


The  expression 
The  expression 
The  expression 
The  expression 
The  expression 


'  (FEET)  '. 
1 (METERS)'. 
' (MILES/H1. 
1  (KILOS/H'. 
'OUR)1. 


6.5.9.5  Outside  Variables. 

Altered:      from   ARTOUT   —  CONV,    UNITS,    UNIT1,    UNIT2 

Used:      from   REPORT  or   LPOUT   —  ART    (passed   as  a  value   to   ARTOUT) 
from  MAXBAND   —  METRIC 


6.5.10     Subroutine  LPOUT. 

6.5.10.1  Purpose. 

Writes  the  solution  report  for  a  loop. 

6.5. 10.2  Synopsis. 


1.  LOOPTP  prints  heading  and  general  loop  information. 

2.  For  each  artery,  writes  a  line  giving  the  artery  number  at  the 
top  of  a  new  page  and  calls  ARTOUT  to  produce  the  solution 
report  for  the  artery. 

3.  JNTOUT  repeats  the  signal  settings  at  the  intersections  where 
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two  arteries  meet. 

6.5.10.3  Subroutine  linkage. 

Called   by:      REPORT 

Calls:      LOOPTPT,    ARTOUT,    JNTOUT 

6.5.10.4  Local  Variables. 

Integer: 

ART  Number  of  current  artery. 

6.5.10.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  SLPAT,    CYCLE,    B,    ROFF,    GOFF,    LOFF,    BOFF,    RBOFF, 

GBOFF,  LBOFF,  BBOFF,  EROFF,  EGOFF,  ELOFF, 
EBOFF,  ERBOFF,  EGBOFF,  ELBOFF,  EBBOFF,  MOFF, 
COFF,  EMOFF,  ECOFF,  MAIN,  CROSS,  G,  GBAR, 
TIME,  TIM BAR,  SPD,  SPDBAR,  DTOT,  DBTOT, 
TTOT,  TBTOT,  ASPD,  ASPDBR,  BSEC,  ESEC,  DSEC, 
BNDSEC,  TAUSEC 
from  MAXBAND  —  LOOP,  N,  METRIC,  INTER,  SEQNO,  BESOBJ,  R, 
RBAR,  L,  LBAR,  D,  DBAR,  TAU,  TAUBAR,  LNAME, 
ANAME,    NODE  NO,    INAME,    ORIENT 


6.5.11      Subroutine  LOOPTP . 

6.5.  11 .  1    Purpose. 

Writes  heading  and  general  information  section  of  the  loop  solution 
report. 

6. 5. 1 1 . 2  Synopsis. 


1.  Calls  SETDIR  for  each  artery  to  obtain  the  alpha-numeric  names 
of  the  outbound  and  inbound  directions. 

2.  Sets  the  number  of  intersections  in  the  loop  (NLOOP)  to  the  sum 
of  the  numbers  in  the  three  arteries,  minus  3  for  the 
intersections  at  artery  meetings  which  otherwise  would  be 
counted  twice. 

3.  Writes  the  name  of  the  loop  and  the  number  of  intersections 
(1000). 

4.  Writes  the  intersection  numbers  at  the  artery  meetings  (2000, 
3000). 

5.  Introduces  the  best  solution  section  (4000). 
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6.  Writes  the  cycle  time  in  seconds  (5000). 

7.  Writes  the  bandwidths  (6000). 

8.  Writes  the  objective  function  (7000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.11.3  Subroutine  linkage. 

Called   by:      LP0UT 
Calls:     SETDIR 

6.5.11.4  Local  Variables. 


Integer: 
NLOOP 
ART 
I 
ART1 

ART2 

INTER1 

INTER2 


Real*8: 

OUT  (3) 
IN  (3) 


Number  of  intersections  in  loop. 

Number  of  current  artery. 

Iteration  variable. 

The  number  of  the  first  artery  at  the  current  artery 

meeting. 
The  number  of  the  second  artery  at  the  current  artery 

meeting. 
The  number  of  the  intersection  in  ART1  at  the  current 

artery  meeting. 
The  number  of  the  intersection  in  ART2  at  the  current 

artery  meeting. 


Alpha-numeric  names  of  the  three  outbound   directions. 
Alpha-numerica  names  of  the  three   inbound   directions. 


6.5.11.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  CYCLE,    B 

from  MAXBAND   —  N,    INTER,    BESOBJ,    LNAME,    ORIENT 


6.5.12     Subroutine  JNTOUT. 

6.  5.  12.  1    Purpose. 

Repeats  the  signal  settings  for  all  four  directions  at  intersections  at 
the  artery  meetings. 
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6. 5. 12. 2  Synopsis. 


1.  Calls  SETDIR  for  each  artery  to  obtain  the  alphanumeric  names  of 
the  outbound  and  inbound  directions. 

2.  Writes  the  heading  (1000). 

3.  Writes  a  message  indicating  that  the  settings  are  relative  to 
the  start  of  green  in  the  outbound  direction  at  intersection 
(signal)  1  in  artery  1  (2000). 

For  each  artery  ART1: 


4.  Finds  the  numbers  of  the  singal  where  artery  ART1  intersects 
artery  ART2.   ART2  is  ART1  +  1  (mod  3). 

5.  Starts  a  new  page  for  the  second  or  third  artery  meeting  (3000). 

6.  Writes  a  heading  for  the  artery  meeting,  giving  the  artery  and 
intersection  (signal)  numbers  (4000). 

7.  Calls  JNTFRC  to  print  the  signal  settings  in  fractions  of  a 
cycle. 

8.  Calls  JNTSEC  to  print  the  signal  settings  in  seconds. 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 

6.5.12.3  Subroutine  linkage. 

Called   by:      LPOUT 

Calls:      JNTFRC,    JNTSEC 

6.5.12.4  Local  Variables. 


Integer: 
ART 
ART1 
ART2 
INTER1 

INTER2 


Number  of  current  artery. 

Number  of  first  artery  at  current  artery  meeting. 
Number  of  second  artery  at  current  artery  meeting. 
Number  of  intersection  in  ART1  at  current  artery 

meeting. 
Number  of  intersection  in  ART2  at  current  artery 

meeting. 


Real*8: 

OUT  (3 ) 
IN  (3) 


Alphanumeric  names  of  the  three  outbound  directions. 
Alphanumeric  names  of  the  three  inbound  directions. 
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6.5.12.5  Outside  Variables. 

Altered:      None. 

Used:      from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      GBOFF,  RBOFF,  LBOFF, 

BBOFF,      EGOFF,      EROFF,    ELOFF,  EBOFF,    EGBOFF, 

ERBOFF,    ELBOFF,    EBBOFF,    MOFF,  EMOFF,  MAIN, 

G,    GBAR,    B,    BSEC,    ESEC,    DSEC,  BNDSEC,  TAUSEC 

from  MAXBAND   —  INTER,    R,    RBAR,    L,    LBAR,    TAU,    TAUBAR,  ORIENT 


6.5.13     Subroutine  JNTFRC. 

6.  5. 13. 1    Purpose. 

Writes  the  signal   settings     in     fractions     of     a     cycle     for     all     four 
directions  at  an  artery  meeting. 

6. 5. 13. 2  Synopsis. 


1.  Writes  heading  and  number  of  intersections  in  first  artery 
(1000). 

2.  Calls  JNTLFR  to  write  the  signal  settings  for  main  street 
directions  of  the  intersection  in  the  first  artery. 

3.  Writes  the  number  of  the  intersection  in  the  second  artery 
(2000). 

4.  Calls  JNTLFR  to  write  the  signal  settings  for  the  main  street 
directions  of  the  intersection  in  the  second   artery. 

5.  If  the  sum  of  the  main  street  phase  durations  in  the  two 
arteries  does  not  equal  one,  there  is  all-red  time.  The 
duration  of  the  all-red  time  between  the  end  of  the  main  street 
phase  on  the  first  artery  and  the  beginning  of  the  mian  street 
phas  on  the  second  artery  is  placed  in  ARED1.  The  duration  of 
the  all-red  time  between  the  end  of  the  main  street  phase  of 
ART2  and  the  beginning  of  the  main  street  phase  of  ART1  is 
placed    in  ARED2. 

The  settings  and   durations  of  the  all-red   periods  are  written 
(3000). 

Note:     The  numbers  in  parentheses  are  the     numbers     of     the     associated 
FORMAT  statements. 
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6.5.13.3  Subroutine  linkage. 

Called  by:      JNTOUT 
Calls:      JNTLFR 

6.5.13.4  Local  Variables. 

Real: 

ARED1  All-red   period  between  the  end     of     the     main     street 

phase     on     ART1  and   the  beginning  of  the  main  street 

phase  on  ART2. 
ARED2  All-red   period  between  the  end     of     the     main     street 

phase     on     ART2  and   the  beginning  of  the  main  street 

phase  on  ART1. 

6.5.13.5  Outside  Variables. 

Altered:      None. 

Used:      from  JNTOUT   —  INTER  1,    INTER2,    ART1,    ART2,    OUT,    IN 

from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      GBOFF,  RBOFF,      LBOFF, 

BBOFF,      EGOFF,      EROFF,    ELOFF,  EBOFF,    EGBOFF, 

ERBOFF,    ELBOFF,    EBBOFF,    MOFF,  EM  OFF,      MAIN, 
G,    GBAR,    B 
from   MAXBAND   —  R,    RBAR,    L,    LBAR,    TAU,    TAUBAR 


6.5.14     Subroutine  JNTLFR. 


6.5.14.1    Purpose. 


Writes  signal   settings  in  fractions  of  a  cycle  for  two  directions  at  an 
artery  meeting. 

6. 5. 14. 2  Synopsis. 


1.  Writes  the  intersection  number  and  signal  settings  for  the 
outbound  direction.  The  left  turn  duration  field  is  left  blank 
if  there  is  no  left  turn  (1000,  2000). 

2.  Writes  the  signal  settings  for  the  inbound  direction.  The  left 
turn  duration  field  is  left  blank  if  there  is  no  left  turn 
(3000,  4000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 
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6.5.14.3  Subroutine  linkage. 

Called  by:      JNTFRC 
Calls:      None. 

6.5.14.4  Local  Variables. 
None. 

6.5.14.5  Outside  Variables. 

Altered:      None. 

Used:      from  JNTOUT   —  INT,    ART,    IN,    OUT    (by  way  of  JNTFRC) 

from  GDOUT   —  GOFF,    ROFF,    LOFF,    BOFF,      GBOFF,      RBOFF,      LBOFF, 
BBOFF,      EGOFF,      EROFF,    ELOFF,    EBOFF,    EGBOFF, 
ERBOFF,    ELBOFF,    EBBOFF,    G,    GBAR,    B 
from  MAXBAND   —  R,    RBAR,    L,    LBAR,    TAU,    TAUBAR 

Note:      INT,    ART,    IN  and   OUT  have  the  values  of  INTER  1,      ART1,      IN (ART  1) 
and   OUT  (ART  1)    or   INTER2,    ART2,    IN(ART2)   AND  OUT(ART2)    from  JNTFRC. 


6.5.15     Subroutine  JNTSEC. 

6.5.15.1  Purpose. 

Writes  the  signal   settings  in  seconds  for  all     four     directions     at     an 
artery  meeting. 

6.5. 15.2  Synopsis. 


1.  Writes  heading  and  number  of  intersections  in  first  artery 
(1000). 

2.  Calls  JNTLSC  to  write  the  signal  settings  for  main  street 
directions  of  the  intersection  in  the  first  artery. 

3.  Writes  the  number  of  the  intersection  in  the  second  artery 
(2000). 

4.  Calls  JNTLSC  to  write  the  signal  settings  for  the  main  street 
directions  of  the  intersection  in  the  second   artery. 

5.  If  the  sum  of  the  main  street  phase  durations  in  the  two 
arteries  does  not  equal  one,  there  is  all-red  time.  The 
duration  of  the  all-red  time  between  the  end  of  the  main  street 
phase  on  the  first  artery  and  the  beginning  of  the  main  street 
phase  on  the  second  artery  is  placed  in  ARED1.  The  duration  of 
the  all-red  time  between  the  end  of  the  main  street  phase  of 
ART2  and  the  beginning  of  the  main  street  phase  of  ART1  is 
placed   in  ARED2. 
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The  settings  and  durations  of  the  all-red   periods  are  written 
(3000). 

Note:     The  numbers  in  parentheses  are  the     numbers     of     the     associated 
FORMAT  statements. 

6.5.15.3  Subroutine  linkage. 

Called   by:      JNTOUT 
Calls:      JNTLSC 

6.5.15.4  Local  Variables. 

Real : 

ARED1        All-red  period  between  the  end  of  the  main  street 

phase  on  ART1  and  the  beginning  of  the  main  street 

phase  on  ART2. 
ARED2        All-red  period  between  the  end  of  the  main  street 

phase  on  ART2  and  the  beginning  of  the  main  street 

phase  on  ART1. 

6.5.15.5  Outside  Variables. 

Altered:  None. 

Used:   from  JNTOUT  —  INTER  1,  INTER2,  ART1,  ART2,  OUT,  IN 

from  GDOUT  —  BSEC,  ESEC,  DSEC,  BNDSEC,  TAUSEC,  MAIN 
from  MAXBAND  —  L,  LBAR 


6.5.16  Subroutine  JNTLSC. 

6.  5. 16.  1  Purpose  . 

Writes  signal  settings  in  seconds  for  two  directions  at  an  artery 
meeting. 

6. 5. 16. 2  Synopsis, 


1.  Writes  the  intersection  (signal)  number  and  signal  settings  for 
the  outbound  direction.  The  left  turn  duration  field  is  left 
blank  if  there  is  no  left  turn  (1000,  2000). 

2.  Writes  the  signal  settings  for  the  inbound  direction.  The  left 
turn  duration  field  is  left  blank  if  there  is  no  left  turn 
(3000,  4000). 

Note:  The  numbers  in  parentheses  are  the  numbers  of  the  associated 
FORMAT  statements. 
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6.5.16.3  Subroutine  linkage. 

Called   by:      JNTSEC 
Calls:      None. 

6.5.16.4  Local  Variables. 
None. 

6.5.16.5  Outside  Variables. 

Altered:      None. 

Used:      from  JNTOUT   —  INT,    ART,    IN,    OUT    (by  way  of  JNTSEC) 
from  GDOUT   —  BSEC,    ESEC,    DSEC,    BNDSEC,    TAUSEC 
from  MAXBAND   —  L,    LBAR 

Note:      INT,    ART,    IN  and   OUT  have  the  values   INTER  1,    ART1,    IN(ART1)      and 
OUT  (ART  1)    or   INTER2,    ART2,    IN(ART2)    and   0UT(ART2)    from  JNTSEC. 
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APPENDIX  A 
MODELS  AND  FORMULATIONS 


This  appendix  presents  the  models   and   formulations   which   are 
incorporated  into  the  MAXBAND  code. 


1. 1  Models. 

1.1.1   MAXBAND 's  Split  Model. 

MAXBAND  uses  the  model  of  cycle  division  shown  in  figure  6.  This 
figure  shows  how  the  cycle  might  be  divided  for  a  intersection  on  an 
artery  entered  from  the  south.  By  changing  the  directional  labels  of  the 
figure  in  the  obvious  manner,  corresponding  figures  can  be  obtained  for 
arteries  entered  from  other  directions.  The  important  features  of  this 
model  are: 


1.  The  cycle  is  divided  into  a  main  street  phase  and  a  cross  street 
phase.  In  addition,  there  may  be  all-red  phases  between  the 
main  and  cross  street  phases  during  which  all  traffic  movements 
have  a  red  light. 

2.  For  each  direction  on  the  main  street,  the  main  street  phase  is 
divided  into  a  green  phase  and  a  red  phase.  For  each  direction, 
the  red  phase  is  a  period  during  which  the  other  direction  may 
make  left  turns.  Hence  the  length  of  the  red  phase  of  the  main 
street  phase  for  each  direction  is  considered  to  be  the  left 
green  split  of  the  opposite  direction,  Kin)  or  l(out),  where 
'out'  and  'in'  refer  to  the  outbound  and  inbound  directions. 
Note  that  the  left  splits  l(out)  and  Kin)  represent  the  maximum 
time  available  for  making  protected  left  turns.  The  user  may 
choose  to  have  protected  left  turn  times  which  are  less  than 
Kout)  and  Kin).  In  turn,  the  length  of  the  green  phase  is 
considered  to  be  the  through  green  split  in  its  direction,  g(in) 
or  g(out).  Hence  the  red  split  in  each  direction  is  the  sum  of 
the  lengths  of  the  red  portion  of  the  main  street  phase  in  its 
direction,  the  cross  street  phase,  and  any  all  red  periods. 

Note  that,  in  figure  6,  the  points  of  division  between  the  SB 
through  and  NB  left  phases,  and  between  the  NB  through  and  SB 
left  phases,  of  the  main  street  phase,  represent  an  arbitrary 
example  of  split  allocation.  The  division  of  the  main  street 
phase  for  an  actual  signal  need  not  be  the  same. 

3.  Though  MAXBAND  is  primarily  concerned  with  splits  on  the  main 
street,  the  cross  street  phase  can  be  divided  into  outbound  and 
inbound,  through  and  left,  green,  splits  in  the  same  way. 
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As  in  point  2,  note  that  the  particular  division  of  the  cross 
street  phase  between  through  and  left  splits  shown  in  figure  6 
is  an  example.  The  division  for  an  actual  signal  need  not  be 
the  same. 

4.  The  model  requires  that  the  length  of  the  main  street  phase  be 
the  same  in  both  directions.  Hence,  the  sums  of  the  green  and 
red  periods  of  the  main  street  phase  in  each  direction  must  be 
the  same.  Since  each  direction  may  make  protected  left  turns 
during  the  red  period  of  the  opposite  direction,  MAXBAND  makes 
the  left  turn  splits,  Kout)  and  Kin),  equal  to  the  lengths  of 
the  red  periods  of  the  main  street  phase  in  the  opposite 
direction,  thereby  including  all  of  this  potential  protected 
left  turn  time  in  its  formulation.  Hence,  the  equal  sum 
requirement  above  can  be  restated  as 

g(out)  +  Kin)  =  g(in)  +  Kout) 

The  user  may  later  decide  to  use  only  some  of  this  protected 
left  time  when  assigning  actual  left  splits.  For  example,  by 
making  the  actual  outbound  left  split  shorter  than  Kout),  or 
the  actual  inbound  left  split  shorter  than  Kin),  the  user  can 
have  both  left  splits  leading,  but  beginning  at  different  times, 
or  both  left  splits  lagging,  but  ending  at  different  times. 

5.  The  overall  effect  of  features  1  and  4  is  that  MAXBAND  divides 
the  cycle  into  two  periods: 

a)  The  main  street  phase  (part  A  of  the  cycle  in  figure  6),  in 
which  both  main  street  directions  are  going  through  or 
turning  left;   and 

b)  The  cross  street  phase  and  all  red  phases  (part  B  of  the 
cycle  in  figure  6),  during  which  neither  direction  is  going 
through  or  turning  left. 

The  portion  of  the  cycle  not  used  by  the  main  street,  that  is, 
the  cross  street  phase  and  any  all  red  periods  (part  B  of  the 
cycle  in  figure  6)  is  called  the  'cross  street  core  time'. 

6.  MAXBAND  allows  the  red  portion  of  the  main  street  phase  in  each 
direction  to  be  placed  at  either  the  beginning  or  the  end  of  the 
main  street  phase.  Since  the  red  portion  corresponds  to  a  left 
turn  period  for  the  opposite  direction,  there  are  four  patterns 
of  left  turns  available  on  the  main  street.  These  are  explained 
in  detail  in  the  next  section. 


-  223  - 


Signals  entered  from  South 


(-Main  Street  (N-S)  Phase-]      |Cross  Street  (E-W)  Phase-| 


SB  through 


NB  left 


WB  through 


EB  left 


NB 
through 


SB  left 


all 

red 

phase 


EB 
through 


WB  left 


all 

red 

phase 


time  (cycles)  > 


B 


| — -Main  Street  Phase 


Cross  Street  Core  Time 


Figure  6:   MAXBAND's  split  model. 
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1.1.2  MAXBAND's  Left  Turn  Model. 

Figure  7  shows  the  four  left  turn  patterns  mentioned  in  the  previous 
section.  The  choice  of  pattern  in  _the  solution  is  determined  by  the 
values  of  the  decision  variables  <5 .  and  6.: 


PATTERN 

l 

1 

0 

1 

2 

1 

0 

3 

0 

0 

4 

1 

1 

The  variable  A   shown  in  figure  6  of  the  the  Summary  Report,  and  used 
in  subroutine  SETDLT,  is  defined  as 


A.  =  (r.  -  r.)  /  2 


6.1.   -   6 .1 . 
li    li 
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1 .   Outbound  left  leads,  inbound  lags 

red 


green 


time 


I  If 

ft 

+)  t 

8h 


A     *  *    I- 

I     -7T—  J" 


«—— — b|- 


out| 


I. 

1 


green       red 


red 


red 


•  inbound 
■j  outbound 


main  street  phase 


cross  street 
core  time 


'0 


cycles 


2.   Outbound  left  lags;  inbound  leads 

green 


\ 


time 


«,  1 

1 1 

I     U 

A   fSSTSi^ i- 

out|   ■  red       *   er 


green 


3.   Outbound  left  leads;  inbound  leads 

red 


f 


time 


+    t 


H°M 


^ 


4* 


i— 


out 


4  I — ^ 

I   'red 


— L 


green 


red 


red 


red 


green 


red 


inbound 
outbound 


i inbound 
4  outbound 


4.   Outbound  left  lags;  inbound  lags 


i 


time 


U 


H^t 


I  t 


green 


yin 


■«t  h 


red 


green       red 


red 


red 


^  inbound 


■^outbound 


Figure  7:   The  four  left  turn  patterns, 
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1 .2  Problem  Formulations. 

MAXBAND  formulates  problems  as  mixed  integer  mathematical  programs. 
These  formulations  are  solved  by  the  MPCODE  mathematical  programming 
system.  This  section  presents  the  formulations.  It  is  intended  only  to 
explain  how  the  formulations  are  used  by  MAXBAND,  not  to  derive  them  or 
explain  them  in  detail.  This  information  is  contained  in  the  Summary 
Report. 


1.2.1  The  single  artery  formulation. 
The  formulation  is  as  follows: 


Find  b.b.z.w. .w.,t . ,t . ,6 . ,5 .  ,m.  to  maximize 
ill  l  l  i  i 


cb  +  cb 

Subject   to: 

=  0 

k  =   1 

-kb  +  b 

L  ° 

k  <   1 

<   0 

k  >    1 

(1) 


(2) 


1/T2  <  z  ±   1/T1  (3) 

w.  +  b  <_  1  -  r. 

—   ,  r-       —    i=l,...,n  (4A) 

w.  +  b  <  1  -  r . 
l     —      l 

(w^  +  w.)  -  (w±+1  -  w.+1)  +  (t .  +  7.)  +  6 ...  -  y.I.  -  5±+1£1+1 

+  6i+1^i+1  "  "±  "    (ri+1  "  ^)   +   Ct±  +  t1+1)        i=l,...,n  (5) 

(d./f .)z  £  t.   £   (d./e.)z  (6A) 

(d./f.)z   <    t.    <    (d./e.)z        i=1»---»n-1  (6B) 

11       —     l  —        11 

(d./h.)Z   <    (d./d.+1)ti+1  -   t.   <    (d./gl)z  (7A) 

(d^h^z   <    (d./dw)t.+1  -   t±  <    (d^g^z        X      '•••'n  (7B) 

Left  turn  choice  constraints  —  see  below  (8) 


b.b.z.w.  .w.  .t'.'.t .  >  0 
liii  — 

m.  integer 

S.,6".  0,1 
i  l 
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where  decision  variables: 

b,b  =  the  outbound  and  inbound  bandwidths. 

z  =  the  inverse  cycle  length  in  1 /cycles. 

w  =  the  time  in  cycles  between  beginnings  of  green  and 

bandwidth  periods  in  outbound  direction  at  intersection  i. 

w.  =  the  time  in  cycles  between  ends  of  bandwidth  and  green 

periods  in  inbound  direction  at  intersection  i. 

t  =  the   outbound   traversal   time   in   cycles   between 

intersections  i  and  i+1 . 

t.  =  the  inbound  traversal  time  in  cycles  between  intersections 

i 

i+1  and  i. 

6., 6         determine  the  left  pattern. 

m.  =  an  integer. 

and  constants: 


n  =  the  number  of  intersections  in  the  artery. 

c/c  =  the  objective  function  weights. 

k  =  the  target  bandwidth  ratio. 

T  ,T  =  the  lower  and  upper  cycle  time  limits  in  seconds. 


r.  ,r . 
i'  i 


:  the  outbound  and  inbound  red  splits  at  intersection  i 
(cycles) . 


£,,£.        =  the  outbound  and  inbound  left  splits  at  intersection  i 
(cycles) . 

t.jT7.        =  the  outbound  and  inbound  queue  clearance   times   at 
1  1         intersection  i  (cycles). 

d.,d~.        =  the  outbound  and  inbound  distances  from  intersection  i  to 


i  i 


intersection  i+1  (feet  or  meters) . 


e  ,f.  (e  ,f  )  =  the  lower  and  upper  limits  on  outbound  (inbound)   speed 
(feet/second  or  meters/second). 

l/h.,l/g.     =  the  lower  and  upper  limits   on   outbound   (inbound) 
reciprocal  change  in  speed  between  links  (seconds/foot  or 
(l/h. ,l/g.)    seconds/meter). 
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The  left  turn  choice  constraints  (8)  are  as  follows: 


if  l±     >  0  and  l±     >  0: 


Leftpat  numbers       Patterns        Equations 
all  four  15  1,2,3,4 

three   7 
11 
13 
14 
two    3 


10 


12 


1,2, 

3 

6. 

l 

+ 

6. 

i 

<    1 

1,2, 

4 

6. 

l 

+ 

6~. 

l 

>    1 

1,3, 

4 

-8  . 

X 

+ 

J. 

i 

2  ° 

2,3, 

4 

6. 

l 

- 

J. 

X 

>  0 

1,2 

6. 

l 

+ 

6~„ 

X 

=  1 

1,3 

6. 

X 

=  o 

2,3 

6\ 

X 

=   0 

1,4 

6. 

X 

=  1 

2,4 

6. 

X 

=  1 

3,4 

6 
i 

- 

6". 

X 

=  o 

(if  i  -   i    ,  the  equations  are  5=0  and  ^  =  0) 
i   i  i  i 


one    1  1  6.  =  0,   6.  -   1 

x         x 


6.  =  1,   6.=  0 
x         i 
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0 

if  only   i  >  0: 


if  only    i  >  0; 


6.  =  0,    6.  =  0 
i        i 


8±-1.    «±-1 


LEFPAT  numbers 


two    5 


10 


one    1 


Patt 

erns 

Equations 

1.3 

5.  =  0 

i 

2,4 

6.  =  1 

i 

1 

6.  =  0 

i 

2 

5.  =  1 

l 

3 

6.  =  0 

i 

4 

6.  =  1 

l 

LEFTPAT  numbers 


two    6 


one    1 


Patt 

erns 

Equat 

;ions 

2,3 

J. 

i 

=  0 

1,4 

J. 

i 

=  1 

1 

J. 
i 

=  1 

2 

i 

=  0 

3 

s". 

i 

=  0 
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6.  =  1 

i 


1.2.2  The  Loop  Formulation. 

The  loop  formulation  consists  mainly  of  a  repetition  of  the  single 
artery  formulation  for  each  of  the  three  arteries.  A  new  constraint 
involving  the  loop  structure  is  added. 

Equations  (1)  and  (2)  of  the  single  artery  formulation  are  replaced  by 

Maximize 

c1b1  4-  c2b2  +  c3b3  +  c4b4  +  c5b5  +  c6b6  (1) 

Subject  to 

-k1b1  +  b2  /  =  0   if  k  =  1 

-k2b3  +  b4  1   >  0   if  k.  <  1  (2A) 

-k0bc  +  b£  /  <  0   if  k.  >  1 
3  5    6  *■  —        i 

-k4b1  +  b3  /  =  0   if  k.  =  1 

~^5\  +   b5  1   >  0   if  k.  <  1  (2B) 

-k,b0  +  b,  (<  0   if  k.  >  1 
6  3    5  v  —         l 

not  used  if  k  =0 

l 

where 


b..  ,b9  =  the  outbound  and  inbound  bandwidths  of  artery  1. 

b„,b,  =  the  outbound  an  inound  bandwidths  of  artery  2. 

b,.,b^  =  the  outbound  and  inbound  bandwidths  of  artery  3. 
5  6 

c  ,c9  =  the  objective  function  weights  of  artery  1. 

c_,c,  =  the  objective  function  weights  of  artery  2. 

c_,c,  =  the  objective  function  weights  of  artery  3. 
d     b 

k  ,k_,k  =  the  target  bandwidth  ratios  for  arteries  1,  2  and  3. 
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k,  ,k,-,k,      =  the  cross  artery  target  bandwdith  ratios  for  arteries  1 
and  2,  1  and  3t  and  2  and  3. 

Equation  (3)  remains  the  same. 

Equations  (4A)  to  (8)  are  repeated  for  each  artery.   This  entails 
replacing 

w. ,w. ,t . ,t . ,6 . ,6 ,  ,m, 
x  _x  i  __i  i  _i  x 

and    r.,r.,£.,£.,x.,T.,d.,d.,e.,e.,f.,f. ,1/h. ,1/h.  ,1/g.  ,1/g.  ,n 
x'  i*  x*  i'  x'  i'  x'  x  x  x  x'  x    x    x*   &x   &x' 


with 


W.     ,_>W.     4.»t.     .  ,t,     *.>&•  *.t&-  ^>m- 

x,art'  x,art'  x,art'  x,art'  x,art   x,art'  x,art 


and    r.     ,r.     , H .  .% .  ,  t  .     ,t.     ,  d .     ,d.     , 

x,art   x,art   x,art   x,art   x,art   x,art   x,art   x,art 

e.     ,e".     ,f.     ,7.     ,1/h.     ,1/h.     ,1/g.     ,1/g". 
x,art'  x,art'  x,art'  x,art'    x,art'    x,art'   &l,art'  /&i,art' 

n 
art 

where  the  latter  are  the  same  variables  and  constants  as  the  former,  but 
restricted  to  artery  art. 
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Finally,  the  loop  equation  is  added: 


-  w 


/i     \      +  w.      ,_ 
inter (1, art) ,art    inter(2,art) ,art 


(9) 


repeat  for  art  =1,  2,  3 


inter(l,art) ,art  inter (2,art)-l,art 


if  inter  (l,art)  <  inter(2,art) 


inter(2,art) ,art  inter(l,art)-l,art 


if  inter(l,art)   >_  inter(2,art) 


inter(l,art) ,art   inter (1, art) ,art 

-  ~5  ~l 

inter(2,art) ,art   inter(2,art) ,art 

-j-  y    (r  —  Z  +  r 

art  '  inter (2, art) , art    inter (2, art) , art    inter (l,art2) ,art2 

-  T  -  1) 

inter(l,art2) ,art2 


repeat  for  art  =  1,  2,  3 


r  —  SL 

inter(l,art) ,art    inter(2,art) ,art 


inter(l,art)+l,art  inter(2,art) ,art 

if  inter(l,art)  _<  inter(2,art) 

+  T.       ,„     ...,        +...+T 


^ 


inter(2,art)+l,art 


inter (1, art) ,art 


if  inter(l,art)  >  inter(2,art) 
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where 

art2  =  (art  +  1 )  mod  3. 

inter  is  the  loop  geometry  variable  INTER  described  in  the  MAXBAND  main 
program  section. 


il  =  an  integer. 

Note:  The  portions  of  equation  (9)  which  contain  variables  or 
constraints  subscripted  by  art  (everything  but  tl  )  are  repeated  for 
art=1 ,2, 3. 
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1.2.3  Constant  names  used  in  the  FORTRAN  Code. 

The  constants  used  in  the  formulations  above  are  given  the  following 
names  in  the  code: 


Table  1. 
Single  Artery  Formulation  Constants 


Name  in  formulation 


n 


Name  in  code 


N 


c,  c 

k 


T    T 
1'  12 


r. ,  r . 

l   i 


I.     a. 


T  .   T  . 
1,    1 


d.  d. 
i,   i 

e .  e . 

f .  1. 
1/h.,  1/h. 
1/g,,  1/g, 


C(1,1),  C(2,2) 

K 

TO),  T(2) 

R(I,1),  RBARU,  1) 

L(I,1),  LBAR(I,1) 

TAU(I,1),  TAUBAR(IJ) 

D(I,1),  DBARU.1) 

E(I,1),  EBAR(I,1) 

F(I,1),  FBAR(I,1) 

IH(I,1),  IHBAR(I,1) 

IG(I,1),  IGBAR(I,1) 
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Table  2. 
Loop  Formulation  Constants. 


Name  in  formulation 


Name  in  code 


n 


art 


1'  "2'   3'   4'   5'   6 

kl'  k2'  k3'  k4'  k5'  k6 

T    T 
1'   2 

r  .     ,  r  . 
i,art   i,art 

I.        _,  I. 
i,art'   i,art 

i,art    i,art 

d.     ,  d. 
i,art   i,art 

s       e 
i,art'   i,art 

f.     ,  f". 
i,art   i,art 

1/h.    .  1/h. 

i,art     i,art 

1/gi,art>  ^l.art 


N(ART) 

C(1,1)  -  C(3,2) 

K(1)  -  K(6) 

T(1),  T(2) 

R(I.ART),  RBAR(I.ART) 

L(I,ART),  LBAR(I.ART) 

TAU(I.ART),  TAUBAR(I,ART) 

D(I.ART),  DBAR(I.ART) 

E(I.ART),  EBAR(I.ART) 

F(I,ART),  FBAR(I.ART) 

IH(I,ART),  IHBAR(I.ART) 

IG(I.ART),  IGBAR(I.ART) 
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1.2.4  Indices  and  Names  of  Decision  Variables  and  Constraints. 

Particular  numbers,  or  indices,  are  associated  with  the  formulation 
decision  variables  and  constraints.  These  numbers  represent  where  the 
particular  decision  variable  and  constraint  are  stored  by  MPCODE.  The 
decision  variable  indices  also  indicate  which  element  of  the  array  OUTVAR 
contains  the  value  of  each  decision  variable. 

The  indices  are  established  in  MATGEN  and  used  in  MPCODE  and  OUTPUT. 
In  addition,  the  decision  variables  are  given  distinct  names  in  the  OUTPUT 
module  code. 

For  each  decision  variable  in  the  single  artery  or  loop  formulations, 
Table  3  or  4  gives  the  variable  name,  index  and  name  as  coded  in  OUTPUT. 

For  each  single  artery  or  loop  formulation  constraint  set,  Table  5  or  6 
gives  the  number  of  the  constraint  set  and  the  associated  indices. 
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Table  3. 

Single  artery  decision  variable  names,  indices 
and  names  in  OUTPUT. 


Name  in 
formulation 


Index 
(also  position 
in  OUTVAR) 


Coded  name 
in  OUTPUT  module 


b,  b 


w. ,  i=l, . .  .  ,n 
w. ,  i=l, . . .  ,n 
t . ,  i=l,...,n-l 


t . ,  i=l,...,n-l 
1 

m. ,  i=l, . . . ,n-l 

6 . ,  i=l, .  . .  ,n 

l 


6 . ,  1=1, . . . ,n 
l 


1.2 

3 

4  to  n+3 

n+4  to  2n+3 

2n+4  to  3n+2 

3n+3  to  4n+1 

4n+2  to  5n 

5n+1  to  5n+DELTAC 


5n+DELTAC+1  to 

5n+DELTAC+DELTBC 


B(1,1),    B(2,1) 

Z 

W(I,1) 

WBARU.1) 

T(I,1) 

TBAR(I,1) 


DELU.1) 

where    KKDELTAC 


DELBAR(IJ) 
where    KKDELTBC 


Notes: 


1.  n  is  the  number  of  signals  in  the  artery. 

2.  i  is  the  number  of  a  particular  signal  or  link. 

3.  8±  and  J±  are  given  indices  and  placed  in  the  formulation  only 
when  the  corresponding  l±  and  i±  are  non-zero.  DELTAC  is  the 
number  of  non-zero  Jt-j/s  and  DELTBC  is  the  number  of  non-zero 

li's. 
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Table  4. 

Loop  decision  variable  names,  indices 
and  names  in  OUTPUT. 


Name  in 
formulation 


Index 
(also  position 
in  OUTVAR) 


Coded  name 
in  OUTPUT  module 


bl'  b2 

1,2 

B(1,1),  B(2,1) 

b3'  b4 

3,4 

B(1,2),  B(2,2) 

b5>  b6 

5,6 

B(1,3),  B(2,3) 

z 

7 

Z 

For  each  artery  art: 

add  VSTART(ART)  to 

Wi,art> 

1=1,..., n   . 
'  art 

4  to  N(ART)+3 

W(I,ART) 

*i,arf 

1=1, . . . ,n 

art 

N(ART)+4  to  2N(ART)+3 

WBAR(I.ART) 

tl,art' 

i=l, . . . ,n 

art 

■1 

2N(ART)+4  to  3N(ART)+2 

T(I,ART) 

tl,art' 

i=l, . . . ,n 

art 

-1 

3N(ART)+3  to  4N(ART)+1 

TBAR(I.ART) 

mi,art' 

i=l, . . . ,n 

'  art 

-1 

4N(ART)+2  to  5NCART) 
5N(ART)+1 

DEL (I, ART) 

6i,art' 

i=l, ... ,n 

to 
5N(ART)+DELTAC(ART) 

where  1<I 

<DELTAC(ART) 

i.art 


i=l, . . . ,n 


5N(ART)+DELTAC(ART)+1 
to 
5NCART) 
+DELTAC ( ART )+DELTBC ( ART ) 


DELBAR(I.ART) 


where  KI 

<DELTBC(ART) 


Loop  variable: 


VSTART(4)+1 


Notes: 


1.   art  is  the  number  of  the  artery  (1,  2  or  3). 
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2.  n    is  the  number  of  signals  in  the  artery. 

art 

3.  i  is  the  number  of  a  particular  signal  or  link. 

4.  VSTART  contains  the  values  added  to  the  single  artery  indices  to 

give  the  loop  indices  for  variables  w.     to  m 

i,art  i,art 

The  elements  of  VSTART  are: 

VSTARK1)   =   4 

VSTART  (2)  =  VSTARTd) 

.  +  5N(1)  -  3  +  DELTACO)  +  DELTBCO) 
VSTART (3)  =  VSTART (2) 

+  5N(2)  -  3  +  DELTAC(2)  +  DELTBC(2) 
VSTART (4)  =  VSTART (3) 

+  5N(3)  -  3  +  DELTAC(3)  +  DELTBC(3)  +  3 

5.  6-^  art  and  6^  art  are  given  indices  and  placed  _  in  the 
formulation  only  when  the  corresponding  l^  art  and  l^_  art  are 
non-zero.  DELTAC(ART)  is  the  number  of  non-zero  £-j_  art 
DELTBC(ART)  is  the  number  of  non-zero  J.    a.  's. 

1  9  all 
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Table  5. 

Single  artery  constraints: 
set  numbers  and  indices 


Constraint  set  number 


Indices 


2 

3 

4A 

4B 

5 

6A 

6B 

7A 

7B 

8 


1 

2,3 

4  to  n+3 

n+4  to  2n+3 

2n+4  to  3n+2 

3n+3  to  5n 

5n+1  to  7n-2 

7n-1  to  9n-6 

9n-5  to  11n-10 

11n-9  to 

1 ln-10  +  CONCNT 


Notes: 


1.  CONCNT  is  the  number  of  left  choice  constraints  required,  as 
determined  in  subroutine  CNCNT  of  the  MATGEN  module. 

2.  Constraint  sets  3  and  6A  to  7B  consist  of  double  equations. 
These  equations  are  stored  in  successive  pairs,  with  the  left 
hand  equation  stored  first  and  the  right  hand  stored  second. 
For  example,  the  6A  constraint 

(d1/f1)z  <  t±   <  (d1/e1)z 

is  broken  into  the  two  constraints 


and 


(d1/f  )z  -  t,  <_  0  with  index  3n  +  3 


(d1/f1)z  -  t,  _>  0  with  index  3n  +  4 
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Table  6. 

loop  constraints: 
set  numbers  and  indices 


Constraint  set  number 


Indices 


2A 
2B 

3 
For  each  artery: 
4A 
4B 
5 

6A 
6B 
7A 
7B 
8 

Loop  constraint: 
9 


3,4,5 
6  to  5  +  KCOUNT 

7  +  KCOUNT 
add  CSTART(ART)  to 

4  to  N(ART)+3 

N(ART)+4  to  2N(ART)+3 

2N(ART)+4  to  3N(ART)+2 

3N(ART)+3  to  5N(ART) 

5N(ART)+1  to  7N(ART)-2 

7N(ART)-1  to  9N(ART)-6 

9N(ART)-5  to  11N(ART)-10 

11N(ART)-9  to 
11N(ART)-10 
+  CONCNT(ART) 

CSTART (4)  +  1 


Notes: 


1.  KCOUNT  is  the  number  of  cross  artery  bandwidth  equations 
required.  It  is  determined  in  subroutine  KCNT  of  module  MATGNL 
by  the  number  of  non-zero  K(4)  -  K(6)'s. 

2.  CSTART  contains  the  values  added  to  the  single  artery  indices  to 
give  the  loop  indices  of  constraints  4A  -  8. 

CSTART  has  the  elements: 

CSTART (1 )  =  2  +  KCOUNT 
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CSTARK2)  =  CSTARK1)  +  1 1N  CI  >  -  13  +  CONCNT(I) 
CSTARK3)  =  CSTARK2)  +  11N(2)  -  13  +  C0NCNT(2) 
CSTARTC4)    =  CSTARK3)   +   1 1NC3)   -   13   +  CONCNK3)   +  3 

3.  CONCNT(ART)  is  the  number  of  left  choice  constraints  required  in 
artery  art,  as  determined  in  subroutine  LCNCNT  of  the  MATGEN 
module. 

4.  Constraint  sets  3  and  6A  to  7B  consist  of  double  equations. 
These  equations  are  stored  in  successive  pairs,  with  the  left 
hand  equation  stored  first  and  the  right  hand  stored  second. 
For  example,  the  6A  constraint 

(V/fl,l)zltl,l-(dl,l/el,l)z 
is  broken  into  the  two  constraints 

(dl,l/fl,l)z  "  "1,1-° 
with  index  3N (ART)+3+CSTART(ART) , 
and 

(dl,l/el,l)z  "  h.l  -  ° 
with  index  3N (ART)+4+CSTART(ART) 
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APPENDIX  B 
SUBROUTINE  CALLING  STRUCTURE 


This  appendix  contains  tables  which  show  the  calling  relationships 
between  the  subroutines  of  submodules  IDATA,  COMPTE  AND  SUMARY  of  module 
INPUT,  of  submodules  MATGNA  and  MATGNL  of  MATGEN,  and  of  submodules 
GETVAR,  SETVAR  and  REPORT  of  OUTPUT. 

Note  that  only  subroutines  which  call  at  leaat  one  other  subroutine  are 
listed  in  the  "caller"  column. 
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Table  7. 
IDATA  Submodule  Calling  Structure. 
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Table  8. 
COMPTE  Submodule  Calling  Structure. 
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Table  9. 
SUMARY  Submodule  Calling  Structure, 
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Table  12. 
GETVAR  Submodule  Calling  Structure. 
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Table  13. 
SETVAR  Submodule  Calling  Structure. 
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Table  14. 
REPORT  Submodule  Calling  Structure. 
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APPENDIX  C 
VARIABLE  USAGE 


This  appendix  contains  tables  which  show  how  the  MAXBAND  variables 
(local  variables  declared  in  subroutine  MAXBAND),  the  INPUT  variables 
(local  variables  declared  in  subroutine  INPUT),  and  the  OUTPUT  variables 
(local  variables  declared  in  subroutine  GDOUT)  are  used  in  the  program. 

Each  table  has  variable  names  on  the  left  and  subroutine  names  at  the 
top.  If  the  value  of  a  variable  is  altered  in  a  particular  subroutine, 
the  appropriate  location  in  the  table  contains  the  letter  'A'.  If  the 
variable  is  used  but  not  altered,  the  table  contains  the  letter  'U'.  Note 
the  table  also  contains  the  letter  'U'  for  variables  passed  by  the 
subroutine  to  subordinate  subroutines  but  otherwise  unaffected. 
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Table  15. 

Usage  of  MAXBAND  local  variables 
which  communicate  between 
MAXBAND,  INPUT,  MATGEN  and  OUTPUT  modules 
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Table   15.      Continued. 
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Table   15.      Continued. 
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Table  17. 
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Table  18. 
Usage  of  GDOUT  local  variables. 
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Table  18.      Continued. 
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FEDERALLY  COORDINATED  PROGRAM  (FCP)  OF  HIGHWAY 
RESEARCH  AND  DEVELOPMENT 


The  Offices  of  Research  and  Development  (R&D)  of 
the  Federal  Highway  Administration  (FHWA)  are 
responsible  for  a  broad  program  of  staff  and  contract 
research  and  development  and  a  Federal-aid 
program,  conducted  by  or  through  the  State  highway 
transportation  agencies,  that  includes  the  Highway 
Planning  and  Research  (HP&R)  program  and  the 
National  Cooperative  Highway  Research  Program 
(NCHRP)  managed  by  the  Transportation  Research 
Board.  The  FCP  is  a  carefully  selected  group  of  proj- 
ects that  uses  research  and  development  resources  to 
obtain  timely  solutions  to  urgent  national  highway 
engineering  problems.* 

The  diagonal  double  stripe  on  the  cover  of  this  report 
represents  a  highway  and  is  color-coded  to  identify 
the  FCP  category  that  the  report  falls  under.  A  red 
stripe  is  used  for  category  1,  dark  blue  for  category  2, 
light  blue  for  category  3,  brown  for  category  4,  gray 
for  category  5,  green  for  categories  6  and  7,  and  an 
orange  stripe  identifies  category  0. 

FCP  Category  Descriptions 

1.  Improved  Highway  Design  and  Operation 
for  Safety 

Safety  R&D  addresses  problems  associated  with 
the  responsibilities  of  the  FHWA  under  the 
Highway  Safety  Act  and  includes  investigation  of 
appropriate  design  standards,  roadside  hardware, 
signing,  and  physical  and  scientific  data  for  the 
formulation  of  improved  safety  regulations. 

2.  Reduction  of  Traffic  Congestion,  and 
Improved  Operational  Efficiency 

Traffic  R&D  is  concerned  with  increasing  the 
operational  efficiency  of  existing  highways  by 
advancing  technology,  by  improving  designs  for 
existing  as  well  as  new  facilities,  and  by  balancing 
the  demand-capacity  relationship  through  traffic 
management  techniques  such  as  bus  and  carpool 
preferential  treatment,  motorist  information,  and 
rerouting  of  traffic. 

3.  Environmental  Considerations  in  Highway 
Design,  Location,  Construction,  and  Opera- 
tion 

Environmental  R&D  is  directed  toward  identify- 
ing and  evaluating  highway  elements  that  affect 

*  The  complete  seven-volume  official  statement  of  the  FCP  is  available  from 
the  National  Technical  Information  Service,  Springfield,  Va.  22161.  Single 
copies  of  the  introductory  volume  are  available  without  charge  from  Program 
Analysis  (HRD-3),  Offices  of  Research  and  Development,  Federal  Highway 
Administration,  Washington,  D.C.  20590. 


the  quality  of  the  human  environment.  The  goals 
are  reduction  of  adverse  highway  and  traffic 
impacts,  and  protection  and  enhancement  of  the 
environment. 

4.  Improved  Materials  Utilization  and 
Durability 

Materials  R&D  is  concerned  with  expanding  the 
knowledge  and  technology  of  materials  properties, 
using  available  natural  materials,  improving  struc- 
tural foundation  materials,  recycling  highway 
materials,  converting  industrial  wastes  into  useful 
highway  products,  developing  extender  or 
substitute  materials  for  those  in  short  supply,  and 
developing  more  rapid  and  reliable  testing 
procedures.  The  goals  are  lower  highway  con- 
struction costs  and  extended  maintenance-free 
operation. 

5.  Improved  Design  to  Reduce  Costs,  Extend 
Life  Expectancy,  and  Insure  Structural 
Safety 

Structural  R&D  is  concerned  with  furthering  the 
latest  technological  advances  in  structural  and 
hydraulic  designs,  fabrication  processes,  and 
construction  techniques  to  provide  safe,  efficient 
highways  at  reasonable  costs. 

6.  Improved  Technology  for  Highway 
Construction 

This  category  is  concerned  with  the  research, 
development,  and  implementation  of  highway 
construction  technology  to  increase  productivity, 
reduce  energy  consumption,  conserve  dwindling 
resources,  and  reduce  costs  while  improving  the 
quality  and  methods  of  construction. 

7.  Improved  Technology  for  Highway 
Maintenance 

This  category  addresses  problems  in  preserving 
the  Nation's  highways  and  includes  activities  in 
physical  maintenance,  traffic  services,  manage- 
ment, and  equipment.  The  goal  is  to  maximize 
operational  efficiency  and  safety  to  the  traveling 
public  while  conserving  resources. 

0.  Other  New  Studies 

This  category,  not  included  in  the  seven-volume 
official  statement  of  the  FCP,  is  concerned  with 
HP&R  and  NCHRP  studies  not  specifically  related 
to  FCP  projects.  These  studies  involve  R&D 
support  of  other  FHWA  program  office  research. 
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